diff options
| author | Deepak Goel <deego@gnufans.org> | 2005-09-18 12:25:02 +0000 |
|---|---|---|
| committer | Deepak Goel <deego@gnufans.org> | 2005-09-18 12:25:02 +0000 |
| commit | 8a26c16552f49f7a61e1e338952110b59e5b2664 (patch) | |
| tree | 573b8698befa710db88672563a1714bbed3e0f0a /lisp/simple.el | |
| parent | be9bb408d2f2e063cc4606cbaa04912a45719efe (diff) | |
| download | emacs-8a26c16552f49f7a61e1e338952110b59e5b2664.tar.gz | |
Message format spec fixes (1)
Diffstat (limited to 'lisp/simple.el')
| -rw-r--r-- | lisp/simple.el | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index fe58a47610e..f06a279c9c2 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3668,9 +3668,18 @@ The goal column is stored in the variable `goal-column'." (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)) + ;; 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) |