[emacs-wiki-discuss] Error at emacs-wiki-rename-link-at-point

[Yamagata Yoriyuki]

Hi,

C-c C-r on the link causes "args-out-of-range" error.  After the
error, the name of the file linked is changed, but the link location
remains the old one.

I'm using the version which I got from Michael Olson's page today and
applied the Sache Chua's patch fixing Japanese input problem.  Emacs I
used is the GNU Emacs 21.3.1.

Here is a backtrace.

Debugger entered--Lisp error: (args-out-of-range -1 -1)
  replace-match("philosophy" t t nil 3)
  (if (eq (aref old-link 0) 91) (replace-match new-name t t nil 3) 
(replace-match (if ... new-name ...) t t))
  (let ((old-point ...)) (if (eq ... 91) (replace-match new-name t t nil 3) 
(replace-match ... t t)) (goto-char old-point))
  emacs-wiki-rename-link(#("[[\xe2af\xd9d8]]" 0 2 (face emacs-wiki-link-face 
intangible t invisible t help-echo "\xe2af\xd9d8" mouse-face highlight keymap 
(keymap ... ... ... ... ... ...) rear-nonsticky t fontified t) 2 4 (face 
emacs-wiki-link-face help-echo "\xe2af\xd9d8" mouse-face highlight keymap 
(keymap ... ... ... ... ... ...) rear-nonsticky t fontified t) 4 6 (face 
emacs-wiki-link-face intangible t invisible t help-echo "\xe2af\xd9d8" 
mouse-face highlight keymap (keymap ... ... ... ... ... ...) rear-nonsticky t 
fontified t)) "philosophy")
  (progn (setq old-name (emacs-wiki-wiki-base ...)) (set-text-properties 0 
(length old-name) nil old-name) (setq new-name (read-from-minibuffer "Rename 
file to: " old-name)) (when (string= old-name new-name) (error "Nothing to 
do")) (emacs-wiki-rename-link-file old-name new-name) (emacs-wiki-rename-link 
(match-string 0) new-name) (emacs-wiki-refresh-buffers))
  (if (emacs-wiki-link-at-point) (progn (setq old-name ...) 
(set-text-properties 0 ... nil old-name) (setq new-name ...) (when ... ...) 
(emacs-wiki-rename-link-file old-name new-name) (emacs-wiki-rename-link ... 
new-name) (emacs-wiki-refresh-buffers)) (error "There is no valid link at 
point"))
  (let (new-name old-name) (if (emacs-wiki-link-at-point) (progn ... ... ... 
... ... ... ...) (error "There is no valid link at point")))
  emacs-wiki-rename-link-at-point()
  call-interactively(emacs-wiki-rename-link-at-point)


--
Yamagata Yoriyuki