diff options
| author | Paul Eggert | 2011-12-04 00:02:42 -0800 |
|---|---|---|
| committer | Paul Eggert | 2011-12-04 00:02:42 -0800 |
| commit | c80e3b4aed2e70eb6d8445d786c0df770094e9e1 (patch) | |
| tree | e44fe2f2604d66890ec2442ea23e73ee5011907a /lisp/textmodes | |
| parent | a24bf23e0f6e5cea917b77cc455314cdcc31be5b (diff) | |
| download | emacs-c80e3b4aed2e70eb6d8445d786c0df770094e9e1.tar.gz emacs-c80e3b4aed2e70eb6d8445d786c0df770094e9e1.zip | |
Spelling fixes.
Diffstat (limited to 'lisp/textmodes')
| -rw-r--r-- | lisp/textmodes/artist.el | 6 | ||||
| -rw-r--r-- | lisp/textmodes/ispell.el | 4 | ||||
| -rw-r--r-- | lisp/textmodes/reftex-dcr.el | 2 | ||||
| -rw-r--r-- | lisp/textmodes/table.el | 4 | ||||
| -rw-r--r-- | lisp/textmodes/texinfmt.el | 4 |
5 files changed, 10 insertions, 10 deletions
diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el index 0efabc2135a..bd1fcc43d22 100644 --- a/lisp/textmodes/artist.el +++ b/lisp/textmodes/artist.el | |||
| @@ -3960,11 +3960,11 @@ The 2-point shape SHAPE is drawn from X1, Y1 to X2, Y2." | |||
| 3960 | ;; Implementation note: This really should honor the interval-fn entry | 3960 | ;; Implementation note: This really should honor the interval-fn entry |
| 3961 | ;; in the master table, `artist-mt', which would mean leaving a timer | 3961 | ;; in the master table, `artist-mt', which would mean leaving a timer |
| 3962 | ;; that calls `draw-fn' every now and then. That timer would then have | 3962 | ;; that calls `draw-fn' every now and then. That timer would then have |
| 3963 | ;; to be cancelled and reinstalled whenever the user moves the cursor. | 3963 | ;; to be canceled and reinstalled whenever the user moves the cursor. |
| 3964 | ;; This could be done, but what if the user suddenly switches to another | 3964 | ;; This could be done, but what if the user suddenly switches to another |
| 3965 | ;; drawing mode, or even kills the buffer! In the mouse case, it is much | 3965 | ;; drawing mode, or even kills the buffer! In the mouse case, it is much |
| 3966 | ;; simpler: when at the end of `artist-mouse-draw-continously', the | 3966 | ;; simpler: when at the end of `artist-mouse-draw-continously', the |
| 3967 | ;; user has released the button, so the timer will always be cancelled | 3967 | ;; user has released the button, so the timer will always be canceled |
| 3968 | ;; at that point. | 3968 | ;; at that point. |
| 3969 | (defun artist-key-draw-continously (x y) | 3969 | (defun artist-key-draw-continously (x y) |
| 3970 | "Draw current continuous shape at X,Y." | 3970 | "Draw current continuous shape at X,Y." |
| @@ -5589,7 +5589,7 @@ The event, EV, is the mouse event." | |||
| 5589 | ;; of drawing mode. | 5589 | ;; of drawing mode. |
| 5590 | ;; | 5590 | ;; |
| 5591 | ;; You should provide these functions. You might think that | 5591 | ;; You should provide these functions. You might think that |
| 5592 | ;; only you is using your type of mode, so noone will be able | 5592 | ;; only you is using your type of mode, so no one will be able |
| 5593 | ;; to switch to another operation of the same type of mode, | 5593 | ;; to switch to another operation of the same type of mode, |
| 5594 | ;; but someone else might base a new drawing mode upon your | 5594 | ;; but someone else might base a new drawing mode upon your |
| 5595 | ;; work. | 5595 | ;; work. |
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index d0967d63740..ba7b84fe1dd 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el | |||
| @@ -2499,7 +2499,7 @@ scrolling the current window. Leave the new window selected." | |||
| 2499 | ;; hidden by new window, scroll it to just below new win | 2499 | ;; hidden by new window, scroll it to just below new win |
| 2500 | ;; otherwise set top line of other win so it doesn't scroll. | 2500 | ;; otherwise set top line of other win so it doesn't scroll. |
| 2501 | (if (< oldot top) (setq top oldot)) | 2501 | (if (< oldot top) (setq top oldot)) |
| 2502 | ;; if frame is unsplitable, temporarily disable that... | 2502 | ;; if frame is unsplittable, temporarily disable that... |
| 2503 | (if (cdr (assq 'unsplittable (frame-parameters (selected-frame)))) | 2503 | (if (cdr (assq 'unsplittable (frame-parameters (selected-frame)))) |
| 2504 | (let ((frame (selected-frame))) | 2504 | (let ((frame (selected-frame))) |
| 2505 | (modify-frame-parameters frame '((unsplittable . nil))) | 2505 | (modify-frame-parameters frame '((unsplittable . nil))) |
| @@ -3979,7 +3979,7 @@ Both should not be used to define a buffer-local dictionary." | |||
| 3979 | ; LocalWords: AMStex hspace includeonly nocite epsfig displaymath eqnarray reg | 3979 | ; LocalWords: AMStex hspace includeonly nocite epsfig displaymath eqnarray reg |
| 3980 | ; LocalWords: minipage modeline pers dict unhighlight buf grep sync prev inc | 3980 | ; LocalWords: minipage modeline pers dict unhighlight buf grep sync prev inc |
| 3981 | ; LocalWords: fn oldot NB AIX msg init read's bufs pt cmd Quinlan eg | 3981 | ; LocalWords: fn oldot NB AIX msg init read's bufs pt cmd Quinlan eg |
| 3982 | ; LocalWords: uuencoded unidiff sc nn VM SGML eval IspellPersDict unsplitable | 3982 | ; LocalWords: uuencoded unidiff sc nn VM SGML eval IspellPersDict |
| 3983 | ; LocalWords: lns XEmacs HTML casechars Multibyte | 3983 | ; LocalWords: lns XEmacs HTML casechars Multibyte |
| 3984 | 3984 | ||
| 3985 | ;;; ispell.el ends here | 3985 | ;;; ispell.el ends here |
diff --git a/lisp/textmodes/reftex-dcr.el b/lisp/textmodes/reftex-dcr.el index ff6ffffc382..2aecc34e2b0 100644 --- a/lisp/textmodes/reftex-dcr.el +++ b/lisp/textmodes/reftex-dcr.el | |||
| @@ -212,7 +212,7 @@ to the functions `reftex-view-cr-cite' and `reftex-view-cr-ref'." | |||
| 212 | (add-hook 'pre-command-hook 'reftex-highlight-shall-die) | 212 | (add-hook 'pre-command-hook 'reftex-highlight-shall-die) |
| 213 | 213 | ||
| 214 | (when (eq how 'tmp-window) | 214 | (when (eq how 'tmp-window) |
| 215 | ;; Resize window and arrange restauration | 215 | ;; Resize window and arrange restoration |
| 216 | (shrink-window (1- (- (window-height) 9))) | 216 | (shrink-window (1- (- (window-height) 9))) |
| 217 | (recenter '(4)) | 217 | (recenter '(4)) |
| 218 | (add-hook 'pre-command-hook 'reftex-restore-window-conf)) | 218 | (add-hook 'pre-command-hook 'reftex-restore-window-conf)) |
diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el index 65f6d98ef79..1a3c5c22815 100644 --- a/lisp/textmodes/table.el +++ b/lisp/textmodes/table.el | |||
| @@ -4293,7 +4293,7 @@ cache buffer into the designated cell in the table buffer." | |||
| 4293 | (car (table--get-coordinate (cdr (table--horizontal-cell-list nil t)))) | 4293 | (car (table--get-coordinate (cdr (table--horizontal-cell-list nil t)))) |
| 4294 | (1+ (cdr (table--get-coordinate (cdr (table--vertical-cell-list nil t)))))))) | 4294 | (1+ (cdr (table--get-coordinate (cdr (table--vertical-cell-list nil t)))))))) |
| 4295 | 4295 | ||
| 4296 | (defun table-call-interactively (function &optional recoard-flag keys) | 4296 | (defun table-call-interactively (function &optional record-flag keys) |
| 4297 | "Call FUNCTION, or a table version of it if applicable. | 4297 | "Call FUNCTION, or a table version of it if applicable. |
| 4298 | See `call-interactively' for full description of the arguments." | 4298 | See `call-interactively' for full description of the arguments." |
| 4299 | (let ((table-func (intern-soft (format "*table--cell-%s" function)))) | 4299 | (let ((table-func (intern-soft (format "*table--cell-%s" function)))) |
| @@ -4301,7 +4301,7 @@ See `call-interactively' for full description of the arguments." | |||
| 4301 | (if (and table-func | 4301 | (if (and table-func |
| 4302 | (table--point-in-cell-p)) | 4302 | (table--point-in-cell-p)) |
| 4303 | table-func | 4303 | table-func |
| 4304 | function) recoard-flag keys))) | 4304 | function) record-flag keys))) |
| 4305 | 4305 | ||
| 4306 | (defun table-funcall (function &rest arguments) | 4306 | (defun table-funcall (function &rest arguments) |
| 4307 | "Call FUNCTION, or a table version of it if applicable. | 4307 | "Call FUNCTION, or a table version of it if applicable. |
diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el index a337d6f9f40..b186b02851d 100644 --- a/lisp/textmodes/texinfmt.el +++ b/lisp/textmodes/texinfmt.el | |||
| @@ -2088,11 +2088,11 @@ This command is executed when texinfmt sees @item inside @multitable." | |||
| 2088 | (table-entry-height 0) | 2088 | (table-entry-height 0) |
| 2089 | ;; unformatted row looks like: A1 @tab A2 @tab A3 | 2089 | ;; unformatted row looks like: A1 @tab A2 @tab A3 |
| 2090 | ;; extract-row command deletes the source line in the table. | 2090 | ;; extract-row command deletes the source line in the table. |
| 2091 | (unformated-row (texinfo-multitable-extract-row))) | 2091 | (unformatted-row (texinfo-multitable-extract-row))) |
| 2092 | ;; Use a temporary buffer | 2092 | ;; Use a temporary buffer |
| 2093 | (set-buffer (get-buffer-create texinfo-multitable-buffer-name)) | 2093 | (set-buffer (get-buffer-create texinfo-multitable-buffer-name)) |
| 2094 | (delete-region (point-min) (point-max)) | 2094 | (delete-region (point-min) (point-max)) |
| 2095 | (insert unformated-row) | 2095 | (insert unformatted-row) |
| 2096 | (goto-char (point-min)) | 2096 | (goto-char (point-min)) |
| 2097 | ;; 1. Check for correct number of @tab in line. | 2097 | ;; 1. Check for correct number of @tab in line. |
| 2098 | (let ((tab-number 1)) ; one @tab between two columns | 2098 | (let ((tab-number 1)) ; one @tab between two columns |