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

[D . Goel]

Index: emacs/lisp/simple.el
diff -c emacs/lisp/simple.el:1.750 emacs/lisp/simple.el:1.751
*** emacs/lisp/simple.el:1.750  Thu Sep 15 03:47:22 2005
--- emacs/lisp/simple.el        Sun Sep 18 12:25:02 2005
***************
*** 3668,3676 ****
          (setq goal-column nil)
          (message "No goal column"))
      (setq goal-column (current-column))
!     (message (substitute-command-keys
!             "Goal column %d (use \\[set-goal-column] with an arg to unset 
it)")
!            goal-column))
    nil)
  
  
--- 3668,3685 ----
          (setq goal-column nil)
          (message "No goal column"))
      (setq goal-column (current-column))
!     ;; The older method below can be erroneous if `set-goal-column' is bound
!     ;; to a sequence containing %
!     ;;(message (substitute-command-keys
!     ;;"Goal column %d (use \\[set-goal-column] with an arg to unset it)")
!     ;;goal-column)
!     (message "%s"
!            (concat 
!             (format "Goal column %d " goal-column)
!             (substitute-command-keys
!              "(use \\[set-goal-column] with an arg to unset it)")))
!     
!     )
    nil)