/[emacs]/emacs/lisp/log-edit.el
ViewVC logotype

Diff of /emacs/lisp/log-edit.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.32 by ttn, Sat Aug 6 22:13:43 2005 UTC revision 1.33 by deego, Sun Sep 18 12:25:02 2005 UTC
# Line 331  If BUFFER is non-nil `log-edit' will jum Line 331  If BUFFER is non-nil `log-edit' will jum
331      (set (make-local-variable 'log-edit-initial-files) (log-edit-files))      (set (make-local-variable 'log-edit-initial-files) (log-edit-files))
332      (when setup (run-hooks 'log-edit-hook))      (when setup (run-hooks 'log-edit-hook))
333      (goto-char (point-min)) (push-mark (point-max))      (goto-char (point-min)) (push-mark (point-max))
334      (message (substitute-command-keys      (message "%s" (substitute-command-keys
335                "Press \\[log-edit-done] when you are done editing."))))                "Press \\[log-edit-done] when you are done editing."))))
336    
337  (define-derived-mode log-edit-mode text-mode "Log-Edit"  (define-derived-mode log-edit-mode text-mode "Log-Edit"
# Line 426  To select default log text, we: Line 426  To select default log text, we:
426    (interactive)    (interactive)
427    (if (eq last-command 'log-edit-mode-help)    (if (eq last-command 'log-edit-mode-help)
428        (describe-function major-mode)        (describe-function major-mode)
429      (message      (message "%s"
430       (substitute-command-keys       (substitute-command-keys
431        "Type `\\[log-edit-done]' to finish commit.  Try `\\[describe-function] log-edit-done' for more help."))))        "Type `\\[log-edit-done]' to finish commit.  Try `\\[describe-function] log-edit-done' for more help."))))
432    

Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26