[Emacs-diffs] Changes to emacs/lisp/add-log.el

[Juanma Barranquero]

Index: emacs/lisp/add-log.el
diff -c emacs/lisp/add-log.el:1.165 emacs/lisp/add-log.el:1.166
*** emacs/lisp/add-log.el:1.165 Thu Jun 23 00:42:02 2005
--- emacs/lisp/add-log.el       Mon Jul  4 01:45:30 2005
***************
*** 33,39 ****
    (require 'timezone))
  
  (defgroup change-log nil
!   "Change log maintenance"
    :group 'tools
    :link '(custom-manual "(emacs)Change Log")
    :prefix "change-log-"
--- 33,39 ----
    (require 'timezone))
  
  (defgroup change-log nil
!   "Change log maintenance."
    :group 'tools
    :link '(custom-manual "(emacs)Change Log")
    :prefix "change-log-"
***************
*** 607,619 ****
                  (beginning-of-line 1)
                  (looking-at "\\s *\\(\\*\\s *\\)?$"))
          (insert ": ")
!         (if version (insert version ?\ )))
        ;; Make it easy to get rid of the function name.
        (undo-boundary)
        (unless (save-excursion
                (beginning-of-line 1)
                (looking-at "\\s *$"))
!       (insert ?\ ))
        ;; See if the prev function name has a message yet or not.
        ;; If not, merge the two items.
        (let ((pos (point-marker)))
--- 607,619 ----
                  (beginning-of-line 1)
                  (looking-at "\\s *\\(\\*\\s *\\)?$"))
          (insert ": ")
!         (if version (insert version ?\s)))
        ;; Make it easy to get rid of the function name.
        (undo-boundary)
        (unless (save-excursion
                (beginning-of-line 1)
                (looking-at "\\s *$"))
!       (insert ?\s))
        ;; See if the prev function name has a message yet or not.
        ;; If not, merge the two items.
        (let ((pos (point-marker)))
***************
*** 633,639 ****
          (insert "("))
        (set-marker pos nil))
        (insert defun "): ")
!       (if version (insert version ?\ )))))
  
  ;;;###autoload
  (defun add-change-log-entry-other-window (&optional whoami file-name)
--- 633,639 ----
          (insert "("))
        (set-marker pos nil))
        (insert defun "): ")
!       (if version (insert version ?\s)))))
  
  ;;;###autoload
  (defun add-change-log-entry-other-window (&optional whoami file-name)