[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp ChangeLog vc-dir.el vc-git.el
From: |
Dan Nicolaescu |
Subject: |
[Emacs-diffs] emacs/lisp ChangeLog vc-dir.el vc-git.el |
Date: |
Wed, 11 Feb 2009 06:36:35 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Dan Nicolaescu <dann> 09/02/11 06:36:34
Modified files:
lisp : ChangeLog vc-dir.el vc-git.el
Log message:
* vc-dir.el (vc-dir-filename-mouse-map): Rename from vc-dir-mouse-map.
(vc-default-dir-printer): Add a comment about updating this function.
* vc-git.el (vc-git-dir-printer): Use vc-dir-filename-mouse-map
for the file name.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15298&r2=1.15299
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/vc-dir.el?cvsroot=emacs&r1=1.35&r2=1.36
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/vc-git.el?cvsroot=emacs&r1=1.79&r2=1.80
Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15298
retrieving revision 1.15299
diff -u -b -r1.15298 -r1.15299
--- ChangeLog 11 Feb 2009 04:02:16 -0000 1.15298
+++ ChangeLog 11 Feb 2009 06:36:32 -0000 1.15299
@@ -1,3 +1,11 @@
+2009-02-10 Dan Nicolaescu <address@hidden>
+
+ * vc-dir.el (vc-dir-filename-mouse-map): Rename from vc-dir-mouse-map.
+ (vc-default-dir-printer): Add a comment about updating this function.
+
+ * vc-git.el (vc-git-dir-printer): Use vc-dir-filename-mouse-map
+ for the file name.
+
2009-02-11 Glenn Morris <address@hidden>
* calendar/calendar.el (calendar-window-list): Ignore invisible windows.
Index: vc-dir.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/vc-dir.el,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -b -r1.35 -r1.36
--- vc-dir.el 10 Feb 2009 05:51:47 -0000 1.35
+++ vc-dir.el 11 Feb 2009 06:36:34 -0000 1.36
@@ -1146,7 +1146,7 @@
(propertize "Please add backend specific headers here. It's easy!"
'face 'font-lock-warning-face)))
-(defvar vc-dir-mouse-map
+(defvar vc-dir-filename-mouse-map
(let ((map (make-sparse-keymap)))
(define-key map [mouse-2] 'vc-dir-find-file-other-window)
map)
@@ -1155,6 +1155,9 @@
(defun vc-default-dir-printer (backend fileentry)
"Pretty print FILEENTRY."
;; If you change the layout here, change vc-dir-move-to-goal-column.
+ ;; VC backends can implement backend specific versions of this
+ ;; function. Changes here might need to be reflected in the
+ ;; vc-BACKEND-dir-printer functions.
(let* ((isdir (vc-dir-fileinfo->directory fileentry))
(state (if isdir "" (vc-dir-fileinfo->state fileentry)))
(filename (vc-dir-fileinfo->name fileentry)))
@@ -1179,7 +1182,7 @@
"Directory\nVC operations can be applied to it\nmouse-3: Pop-up menu"
"File\nmouse-3: Pop-up menu")
'mouse-face 'highlight
- 'keymap vc-dir-mouse-map))))
+ 'keymap vc-dir-filename-mouse-map))))
(defun vc-default-extra-status-menu (backend)
nil)
Index: vc-git.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/vc-git.el,v
retrieving revision 1.79
retrieving revision 1.80
diff -u -b -r1.79 -r1.80
--- vc-git.el 5 Jan 2009 03:19:52 -0000 1.79
+++ vc-git.el 11 Feb 2009 06:36:34 -0000 1.80
@@ -302,6 +302,7 @@
(if isdir
"Directory\nVC operations can be applied to it\nmouse-3:
Pop-up menu"
"File\nmouse-3: Pop-up menu")
+ 'keymap vc-dir-filename-mouse-map
'mouse-face 'highlight)
(vc-git-file-type-as-string old-perm new-perm)
(vc-git-rename-as-string state extra))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp ChangeLog vc-dir.el vc-git.el,
Dan Nicolaescu <=