Mercurial > hg > xemacs-beta

diff lisp/prim/modeline.el @ 22:8fc7fe29b841 r19-15b94

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b94
author cvs
date Mon, 13 Aug 2007 08:50:29 +0200
parents 0293115a14e9
children e04119814345
line wrap: on
line diff
--- a/lisp/prim/modeline.el	Mon Aug 13 08:50:06 2007 +0200
+++ b/lisp/prim/modeline.el	Mon Aug 13 08:50:29 2007 +0200
@@ -394,7 +394,7 @@
 (defvar modeline-modified-map (make-sparse-keymap 'modeline-modified-map)
   "Keymap consulted for mouse-clicks on the modeline-modified string.")
 (define-key modeline-modified-map 'button2
-  (make-modeline-command-wrapper 'toggle-read-only))
+  (make-modeline-command-wrapper 'vc-toggle-read-only))
 
 (defvar modeline-modified-extent (make-extent nil nil)
   "Extent covering the modeline-modified string.")