bugemacs-wiki, planner, and related modules - Bugs: bug #14337, bug in emacs-wiki-link-url

 
 

bug #14337: bug in emacs-wiki-link-url

Submitted by:  None
Submitted on:  Tue 30 Aug 2005 10:06:05 AM UTC  
 
Category: emacs-wikiSeverity: 3 - Normal
Item Group: NoneStatus: Fixed
Privacy: PublicAssigned to: Michael W. Olson <mwolson>
Open/Closed: Closed

Add a New Comment(Rich Markup)
   

You are not logged in

Please log in, so followups can be emailed to you.

 

Sun 25 Sep 2005 01:49:36 AM UTC, comment #1:

This should now be fixed. Thanks for the report!

2005-09-25 01:48:38 GMT Michael Olson <mwolson@gnu.org> patch-140

Summary:
Fix #14337: bug in emacs-wiki-link-url.
Revision:
emacs-wiki--main--1.0--patch-140

* emacs-wiki-publish.el (emacs-wiki-link-url): Treat WikiIndex pages
specially, since they might not exist on the filesystem yet.

modified files:
ChangeLog emacs-wiki-publish.el

Michael W. Olson <mwolson>
Project AdministratorIn charge of this item.
Tue 30 Aug 2005 10:06:05 AM UTC, original submission:

can not generate footer correctly
because (emacs-wiki-link-url "WikiIndex") eval
to nil.
fixed as following.

(defun emacs-wiki-link-url (wiki-link)
"Resolve the given WIKI-LINK into its ultimate URL form."
(let ((link (emacs-wiki-wiki-link-target wiki-link)))
(save-match-data
(cond
((emacs-wiki-wiki-url-p link)
(emacs-wiki-escape-url link))
((or (string-match emacs-wiki-image-regexp link)
(string-match emacs-wiki-file-regexp link))
link)
+ ((string= link emacs-wiki-index-page)
+ (emacs-wiki-escape-url
+ (emacs-wiki-published-name
+ link (emacs-wiki-page-name))))
((assoc (emacs-wiki-wiki-base link)
(emacs-wiki-file-alist))
(if (string-match "#" link)
(concat
(emacs-wiki-escape-url
(emacs-wiki-published-name
(substring link 0 (match-beginning 0))
(emacs-wiki-page-name)))
(let ((anchor (substring link (match-end 0))))
;; if it's only a number (or blank), put "anchor-" in
;; front
(if (string-match "\\`[0-9]*\\'" anchor)
(concat "#anchor-" anchor)
(concat "#" anchor))))
(emacs-wiki-escape-url
(emacs-wiki-published-name
link (emacs-wiki-page-name)))))))))

Anonymous

 

(Note: upload size limit is set to 16384 kB, after insertion of the required escape characters.)

Attach File(s):
   
   
Comment:
   

No files currently attached

 

Depends on the following items: None found

Items that depend on this one: None found

 

CC list is empty

 

Do you think this task is very important?
If so, you can click here to add your encouragement to it.
This task has 0 encouragements so far.

Only logged-in users can vote.

 

Please enter the title of George Orwell's famous dystopian book (it's a date):

 

 

Follow 4 latest changes.

Date Changed By Updated Field Previous Value => Replaced By
Sun 25 Sep 2005 01:49:36 AM UTCmwolsonStatusNone=>Fixed
  Assigned toNone=>mwolson
  Open/ClosedOpen=>Closed
Wed 31 Aug 2005 01:29:10 AM UTCwcyCarbon-Copy-=>Added -unavailable-

Back to the top


Powered by Savane 3.1-cleanup1