diff options
| author | Jay Belanger <jay.p.belanger@gmail.com> | 2005-01-02 07:39:20 +0000 |
|---|---|---|
| committer | Jay Belanger <jay.p.belanger@gmail.com> | 2005-01-02 07:39:20 +0000 |
| commit | 72e53dcd4198a717d3ae7488500396d05ccb5e69 (patch) | |
| tree | a0aba7eb472c2779a467f2a6b0ddea2e72a659e7 /lisp/calc/calc-yank.el | |
| parent | 42a797def401f87066c2680f1bac599ec889612a (diff) | |
| download | emacs-72e53dcd4198a717d3ae7488500396d05ccb5e69.tar.gz | |
(calc-edit-mode): Make header in italic.
Diffstat (limited to 'lisp/calc/calc-yank.el')
| -rw-r--r-- | lisp/calc/calc-yank.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/calc/calc-yank.el b/lisp/calc/calc-yank.el index ccb9a19ae51..6f75613b014 100644 --- a/lisp/calc/calc-yank.el +++ b/lisp/calc/calc-yank.el @@ -464,10 +464,13 @@ To cancel the edit, simply kill the *Calc Edit* buffer." (let ((calc-edit-handler nil)) (calc-edit-finish t)) (message "(Cancelled)")) t t) - (insert (or title title "Calc Edit Mode. ") - "Press `C-c C-c'" - (if allow-ret "" " or RET") - " to finish, `C-x k RET' to cancel.\n\n"))) + (insert (propertize + (concat + (or title title "Calc Edit Mode. ") + "Press `C-c C-c'" + (if allow-ret "" " or RET") + " to finish, `C-x k RET' to cancel.\n\n") + 'font-lock-face 'italic)))) (put 'calc-edit-mode 'mode-class 'special) (defun calc-show-edit-buffer () |