[Emacs-diffs] Changes to emacs/lisp/wdired.el,v

[Martin Rudalics]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Martin Rudalics <m061211>       07/01/09 09:13:27

Index: wdired.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/wdired.el,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -b -r1.22 -r1.23
--- wdired.el   9 Dec 2006 16:15:26 -0000       1.22
+++ wdired.el   9 Jan 2007 09:13:27 -0000       1.23
@@ -576,7 +576,10 @@
             (funcall command 1)
             (setq arg (1- arg)))
         (error
-         (if (not (forward-word 1))
+         (if (forward-word)
+            ;; Skip any non-word characters to avoid triggering a read-only
+            ;; error which would cause skipping the next word characters too.
+            (skip-syntax-forward "^w")
              (setq arg 0)))))))
 
 (defun wdired-downcase-word (arg)