Mercurial > emacs
changeset 95535:3a67eec377e0
(variable-pitch-mode): Reflow docstrings.
(text-scale-mode, adjust-buffer-face-height): Fix typos in docstrings.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Wed, 04 Jun 2008 11:12:44 +0000 |
| parents | a7555dd39a84 |
| children | b1ce615c4de6 |
| files | lisp/face-remap.el |
| diffstat | 1 files changed, 19 insertions(+), 19 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/face-remap.el Wed Jun 04 07:53:59 2008 +0000 +++ b/lisp/face-remap.el Wed Jun 04 11:12:44 2008 +0000 @@ -132,7 +132,7 @@ (if entry (setcar (last entry) specs) ; overwrite existing base entry (push (list face specs) face-remapping-alist))))) - + ;; ---------------------------------------------------------------- ;; text-scale-mode @@ -159,14 +159,14 @@ "Minor mode for displaying buffer text in a larger/smaller font than usual. The amount of scaling is determined by the variable -`text-scale-mode-amount': one step scales the global default -face size by the value of the variable `text-scale-mode-step' (a -negative amount shrinks the text). +`text-scale-mode-amount': one step scales the global default +face size by the value of the variable `text-scale-mode-step' +\(a negative amount shrinks the text). -The `increase-buffer-face-height' and -`decrease-buffer-face-height' functions may be used to -interactively modify the variable `text-scale-mode-amount' (they -also enable or disable `text-scale-mode' as necessary." +The `increase-buffer-face-height' and `decrease-buffer-face-height' +functions may be used to interactively modify the variable +`text-scale-mode-amount' (they also enable or disable `text-scale-mode' +as necessary)." :lighter (" " text-scale-mode-lighter) (when text-scale-mode-remapping (remove-relative-face-remapping text-scale-mode-remapping)) @@ -210,16 +210,15 @@ "Increase or decrease the height of the default face in the current buffer. The actual adjustment made depends on the final component of the -key-binding used to invoke the command, with all modifiers -removed: +key-binding used to invoke the command, with all modifiers removed: +, = Increase the default face height by one step - Decrease the default face height by one step 0 Reset the default face height to the global default Then, continue to read input events and further adjust the face -height as long as the input event read (with all modifiers -removed) is one the above. +height as long as the input event read (with all modifiers removed) +is one of the above. Each step scales the height of the default face by the variable `text-scale-mode-step' (a negative number of steps decreases the @@ -228,11 +227,11 @@ This command is a special-purpose wrapper around the `increase-buffer-face-height' command which makes repetition -convenient even when it is bound in a non-top-level keymap. For -binding in a top-level keymap, `increase-buffer-face-height' or -`decrease-default-face-height' may be more appropriate." +convenient even when it is bound in a non-top-level keymap. +For binding in a top-level keymap, `increase-buffer-face-height' +or `decrease-default-face-height' may be more appropriate." (interactive "p") - (let ((first t) + (let ((first t) (step t) (ev last-command-event)) (while step @@ -243,7 +242,7 @@ (setq step (- inc))) ((eq base ?0) (setq step 0)) - (first + (first (setq step inc)) (t (setq step nil)))) @@ -264,8 +263,9 @@ (make-variable-buffer-local 'variable-pitch-mode-remapping) (define-minor-mode variable-pitch-mode - "Variable-pitch default-face mode. When active, causes the -buffer text to be displayed using the `variable-pitch' face." + "Variable-pitch default-face mode. +When active, causes the buffer text to be displayed using +the `variable-pitch' face." :lighter " VarPitch" (when variable-pitch-mode-remapping (remove-relative-face-remapping variable-pitch-mode-remapping))