aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorPaul Eggert2011-12-04 00:02:42 -0800
committerPaul Eggert2011-12-04 00:02:42 -0800
commitc80e3b4aed2e70eb6d8445d786c0df770094e9e1 (patch)
treee44fe2f2604d66890ec2442ea23e73ee5011907a /lisp/textmodes
parenta24bf23e0f6e5cea917b77cc455314cdcc31be5b (diff)
downloademacs-c80e3b4aed2e70eb6d8445d786c0df770094e9e1.tar.gz
emacs-c80e3b4aed2e70eb6d8445d786c0df770094e9e1.zip
Spelling fixes.
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/artist.el6
-rw-r--r--lisp/textmodes/ispell.el4
-rw-r--r--lisp/textmodes/reftex-dcr.el2
-rw-r--r--lisp/textmodes/table.el4
-rw-r--r--lisp/textmodes/texinfmt.el4
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.
4298See `call-interactively' for full description of the arguments." 4298See `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