diff options
| author | Paul Eggert <eggert@cs.ucla.edu> | 2015-08-28 22:24:10 -0700 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2015-08-28 22:25:09 -0700 |
| commit | 5e63c842007b0f85e91735a7c4e00be0b7fe9ba5 (patch) | |
| tree | ebef360bed879a59b45e167f9679e6bbbe9369c7 /lisp/calc/calc-mode.el | |
| parent | ff441d3508add9eed3c5217ae7b0a8800b9fc917 (diff) | |
| download | emacs-5e63c842007b0f85e91735a7c4e00be0b7fe9ba5.tar.gz emacs-5e63c842007b0f85e91735a7c4e00be0b7fe9ba5.tar.bz2 emacs-5e63c842007b0f85e91735a7c4e00be0b7fe9ba5.zip | |
Fix minor text quoting in calc, calendar, vc
* lisp/calc/calc-ext.el (calc-shift-Z-prefix-help):
* lisp/calc/calc-help.el (calc-j-prefix-help):
* lisp/calc/calc-misc.el (calc-help):
* lisp/calc/calc.el (calc-algebraic-mode, calc-mode):
Escape an apostrophe in a docstring.
* lisp/calc/calc-forms.el (calc-hms-notation):
* lisp/calc/calc-mode.el (calc-display-raw, calc-algebraic-mode):
Escape an apostrophe in a diagnostic.
* lisp/calc/calc-misc.el (calc-help):
* lisp/calendar/diary-lib.el (diary-include-files):
* lisp/calendar/todo-mode.el (todo-prefix, todo-item-mark):
* lisp/vc/diff-mode.el (diff-delete-trailing-whitespace):
* lisp/vc/ediff-diff.el (ediff-same-contents):
* lisp/vc/ediff-merg.el (ediff-re-merge):
* lisp/vc/ediff-ptch.el (ediff-patch-file-internal):
* lisp/vc/ediff-util.el (ediff-test-save-region)
(ediff-status-info):
* lisp/vc/ediff.el (ediff-merge-revisions)
(ediff-merge-revisions-with-ancestor):
* lisp/vc/pcvs.el (cvs-mode-checkout, cvs-vc-command-advice):
* lisp/vc/vc-cvs.el (vc-cvs-mode-line-string):
Respect text quoting style in doc string or diagnostic.
* lisp/calc/calc-prog.el (calc-kbd-push, calc-kbd-pop):
* lisp/vc/add-log.el (change-log-goto-source):
Avoid double-formatting.
* lisp/vc/ediff-init.el (format-message):
New backward-compatibility alias.
Diffstat (limited to 'lisp/calc/calc-mode.el')
| -rw-r--r-- | lisp/calc/calc-mode.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/calc/calc-mode.el b/lisp/calc/calc-mode.el index 605084e3f35..b5eef7f6784 100644 --- a/lisp/calc/calc-mode.el +++ b/lisp/calc/calc-mode.el @@ -258,7 +258,7 @@ (setq calc-display-raw (if calc-display-raw nil (if arg 0 t))) (calc-do-refresh) (if calc-display-raw - (message "Press d ' again to cancel \"raw\" display mode")))) + (message "%s" "Press d ' again to cancel \"raw\" display mode")))) @@ -446,11 +446,11 @@ (calc-change-mode '(calc-algebraic-mode calc-incomplete-algebraic-mode) (list (not calc-algebraic-mode) nil))) (use-local-map calc-mode-map) - (message (if calc-algebraic-mode - "Numeric keys and ( and [ begin algebraic entry" - (if calc-incomplete-algebraic-mode - "Only ( and [ begin algebraic entry" - "No keys except ' and $ begin algebraic entry"))))) + (message "%s" (if calc-algebraic-mode + "Numeric keys and ( and [ begin algebraic entry" + (if calc-incomplete-algebraic-mode + "Only ( and [ begin algebraic entry" + "No keys except ' and $ begin algebraic entry"))))) (defun calc-symbolic-mode (n) (interactive "P") |