aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorJoakim Verona2011-12-28 04:12:56 +0100
committerJoakim Verona2011-12-28 04:12:56 +0100
commitbb29f044aa967831cd664c54eba0de0c701436ce (patch)
tree1398cc9780bbae0fdad071a3a3765a571c3f6d7b /lisp/textmodes
parent3c935a7e996701244d166f684119f0ff97e25496 (diff)
parent5e605a2e528955721fc6f2bd7b9f174c15075fb1 (diff)
downloademacs-bb29f044aa967831cd664c54eba0de0c701436ce.tar.gz
emacs-bb29f044aa967831cd664c54eba0de0c701436ce.zip
upstream i think
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/artist.el2
-rw-r--r--lisp/textmodes/bibtex.el4
-rw-r--r--lisp/textmodes/conf-mode.el6
-rw-r--r--lisp/textmodes/fill.el2
-rw-r--r--lisp/textmodes/flyspell.el2
-rw-r--r--lisp/textmodes/ispell.el5
-rw-r--r--lisp/textmodes/reftex-sel.el4
-rw-r--r--lisp/textmodes/rst.el2
-rw-r--r--lisp/textmodes/table.el10
-rw-r--r--lisp/textmodes/tex-mode.el2
-rw-r--r--lisp/textmodes/texinfmt.el4
11 files changed, 22 insertions, 21 deletions
diff --git a/lisp/textmodes/artist.el b/lisp/textmodes/artist.el
index 232d42efc94..0efabc2135a 100644
--- a/lisp/textmodes/artist.el
+++ b/lisp/textmodes/artist.el
@@ -3215,7 +3215,7 @@ X1, Y1. An endpoint is a cons pair, (ENDPOINT-X . ENDPOINT-Y)."
3215;; 2| | 3215;; 2| |
3216;; 3+-----+ 3216;; 3+-----+
3217;; 3217;;
3218;; We will then pop (0,0) and remove the left-most vertival line while 3218;; We will then pop (0,0) and remove the left-most vertical line while
3219;; pushing the lower left corner (0,3) on the stack, and so on until 3219;; pushing the lower left corner (0,3) on the stack, and so on until
3220;; the entire rectangle is vaporized. 3220;; the entire rectangle is vaporized.
3221;; 3221;;
diff --git a/lisp/textmodes/bibtex.el b/lisp/textmodes/bibtex.el
index c9b1c44eb91..8df2e81c723 100644
--- a/lisp/textmodes/bibtex.el
+++ b/lisp/textmodes/bibtex.el
@@ -1451,12 +1451,12 @@ Set this variable before loading BibTeX mode."
1451(defvar bibtex-field-braces-opt nil 1451(defvar bibtex-field-braces-opt nil
1452 "Optimized value of `bibtex-field-braces-alist'. 1452 "Optimized value of `bibtex-field-braces-alist'.
1453Created by `bibtex-field-re-init'. 1453Created by `bibtex-field-re-init'.
1454It is a an alist with elements (FIELD . REGEXP).") 1454It is an alist with elements (FIELD . REGEXP).")
1455 1455
1456(defvar bibtex-field-strings-opt nil 1456(defvar bibtex-field-strings-opt nil
1457 "Optimized value of `bibtex-field-strings-alist'. 1457 "Optimized value of `bibtex-field-strings-alist'.
1458Created by `bibtex-field-re-init'. 1458Created by `bibtex-field-re-init'.
1459It is a an alist with elements (FIELD RULE1 RULE2 ...), 1459It is an alist with elements (FIELD RULE1 RULE2 ...),
1460where each RULE is (REGEXP . TO-STR).") 1460where each RULE is (REGEXP . TO-STR).")
1461 1461
1462(defvar bibtex-pop-previous-search-point nil 1462(defvar bibtex-pop-previous-search-point nil
diff --git a/lisp/textmodes/conf-mode.el b/lisp/textmodes/conf-mode.el
index 1127e6a5d20..40d682c3d93 100644
--- a/lisp/textmodes/conf-mode.el
+++ b/lisp/textmodes/conf-mode.el
@@ -185,7 +185,7 @@ not align (only setting space according to `conf-assignment-space')."
185 (2 'font-lock-constant-face nil t)) 185 (2 'font-lock-constant-face nil t))
186 ;; section { ... } (do this last because some assign ...{...) 186 ;; section { ... } (do this last because some assign ...{...)
187 ("^[ \t]*\\([^=:\n]+?\\)[ \t\n]*{[^{}]*?$" 1 'font-lock-type-face prepend)) 187 ("^[ \t]*\\([^=:\n]+?\\)[ \t\n]*{[^{}]*?$" 1 'font-lock-type-face prepend))
188 "Keywords to hilight in Conf mode.") 188 "Keywords to highlight in Conf mode.")
189 189
190(defvar conf-javaprop-font-lock-keywords 190(defvar conf-javaprop-font-lock-keywords
191 '(;; var=val 191 '(;; var=val
@@ -197,7 +197,7 @@ not align (only setting space according to `conf-assignment-space')."
197 (5 'font-lock-variable-name-face nil t) 197 (5 'font-lock-variable-name-face nil t)
198 (6 'font-lock-constant-face nil t) 198 (6 'font-lock-constant-face nil t)
199 (7 'font-lock-variable-name-face nil t))) 199 (7 'font-lock-variable-name-face nil t)))
200 "Keywords to hilight in Conf Java Properties mode.") 200 "Keywords to highlight in Conf Java Properties mode.")
201 201
202(defvar conf-space-keywords-alist 202(defvar conf-space-keywords-alist
203 '(("\\`/etc/gpm/" . "key\\|name\\|foreground\\|background\\|border\\|head") 203 '(("\\`/etc/gpm/" . "key\\|name\\|foreground\\|background\\|border\\|head")
@@ -240,7 +240,7 @@ This variable is best set in the file local variables, or through
240 (1 'font-lock-variable-name-face)) 240 (1 'font-lock-variable-name-face))
241 ;; section { ... } (do this last because some assign ...{...) 241 ;; section { ... } (do this last because some assign ...{...)
242 ("^[ \t]*\\([^:\n]+\\)[ \t\n]*{[^{}]*?$" 1 'font-lock-type-face prepend)) 242 ("^[ \t]*\\([^:\n]+\\)[ \t\n]*{[^{}]*?$" 1 'font-lock-type-face prepend))
243 "Keywords to hilight in Conf Colon mode.") 243 "Keywords to highlight in Conf Colon mode.")
244 244
245(defvar conf-assignment-sign ?= 245(defvar conf-assignment-sign ?=
246 "Sign used for assignments (char or string).") 246 "Sign used for assignments (char or string).")
diff --git a/lisp/textmodes/fill.el b/lisp/textmodes/fill.el
index 52f6e5b4889..b8614b16f82 100644
--- a/lisp/textmodes/fill.el
+++ b/lisp/textmodes/fill.el
@@ -469,7 +469,7 @@ Point is moved to just past the fill prefix on the first line."
469 469
470 (goto-char from) 470 (goto-char from)
471 (if enable-multibyte-characters 471 (if enable-multibyte-characters
472 ;; Delete unnecessay newlines surrounded by words. The 472 ;; Delete unnecessary newlines surrounded by words. The
473 ;; character category `|' means that we can break a line at the 473 ;; character category `|' means that we can break a line at the
474 ;; character. And, char-table 474 ;; character. And, char-table
475 ;; `fill-nospace-between-words-table' tells how to concatenate 475 ;; `fill-nospace-between-words-table' tells how to concatenate
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el
index d54debcec4c..6b4c1a2940d 100644
--- a/lisp/textmodes/flyspell.el
+++ b/lisp/textmodes/flyspell.el
@@ -466,7 +466,7 @@ See also `flyspell-duplicate-distance'."
466;;*---------------------------------------------------------------------*/ 466;;*---------------------------------------------------------------------*/
467;;* flyspell-mode ... */ 467;;* flyspell-mode ... */
468;;*---------------------------------------------------------------------*/ 468;;*---------------------------------------------------------------------*/
469;;;###autoload(defvar flyspell-mode nil) 469;;;###autoload(defvar flyspell-mode nil "Non-nil if Flyspell mode is enabled.")
470;;;###autoload 470;;;###autoload
471(define-minor-mode flyspell-mode 471(define-minor-mode flyspell-mode
472 "Toggle on-the-fly spell checking (Flyspell mode). 472 "Toggle on-the-fly spell checking (Flyspell mode).
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 704fad4fb3b..d0967d63740 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -2399,7 +2399,8 @@ Optional REFRESH will unhighlighted then highlight, using block cursor
2399 (setq start (1+ start)))) ; On block non-refresh, inc start. 2399 (setq start (1+ start)))) ; On block non-refresh, inc start.
2400 (let ((modified (buffer-modified-p)) ; don't allow this fn to modify buffer 2400 (let ((modified (buffer-modified-p)) ; don't allow this fn to modify buffer
2401 (buffer-read-only nil) ; Allow highlighting read-only buffers. 2401 (buffer-read-only nil) ; Allow highlighting read-only buffers.
2402 (text (buffer-substring-no-properties start end)) ; Save hilight region 2402 (text (buffer-substring-no-properties start end))
2403 ; Save highlight region.
2403 (inhibit-quit t) ; inhibit interrupt processing here. 2404 (inhibit-quit t) ; inhibit interrupt processing here.
2404 (buffer-undo-list t)) ; don't clutter the undo list. 2405 (buffer-undo-list t)) ; don't clutter the undo list.
2405 (goto-char end) 2406 (goto-char end)
@@ -3977,7 +3978,7 @@ Both should not be used to define a buffer-local dictionary."
3977; LocalWords: Francais Nederlands charset autoloaded popup nonmenu regexp num 3978; LocalWords: Francais Nederlands charset autoloaded popup nonmenu regexp num
3978; LocalWords: AMStex hspace includeonly nocite epsfig displaymath eqnarray reg 3979; LocalWords: AMStex hspace includeonly nocite epsfig displaymath eqnarray reg
3979; LocalWords: minipage modeline pers dict unhighlight buf grep sync prev inc 3980; LocalWords: minipage modeline pers dict unhighlight buf grep sync prev inc
3980; LocalWords: fn hilight 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
3981; LocalWords: uuencoded unidiff sc nn VM SGML eval IspellPersDict unsplitable 3982; LocalWords: uuencoded unidiff sc nn VM SGML eval IspellPersDict unsplitable
3982; LocalWords: lns XEmacs HTML casechars Multibyte 3983; LocalWords: lns XEmacs HTML casechars Multibyte
3983 3984
diff --git a/lisp/textmodes/reftex-sel.el b/lisp/textmodes/reftex-sel.el
index b4e15fd2776..f4f10f1d1e0 100644
--- a/lisp/textmodes/reftex-sel.el
+++ b/lisp/textmodes/reftex-sel.el
@@ -570,13 +570,13 @@ Useful for large TOC's."
570 nil t) 570 nil t)
571 (beginning-of-line)) 571 (beginning-of-line))
572(defun reftex-select-next-heading (&optional arg) 572(defun reftex-select-next-heading (&optional arg)
573 "Move to next table of contentes line." 573 "Move to next table of contents line."
574 (interactive "p") 574 (interactive "p")
575 (end-of-line) 575 (end-of-line)
576 (re-search-forward "^ " nil t arg) 576 (re-search-forward "^ " nil t arg)
577 (beginning-of-line)) 577 (beginning-of-line))
578(defun reftex-select-previous-heading (&optional arg) 578(defun reftex-select-previous-heading (&optional arg)
579 "Move to previous table of contentes line." 579 "Move to previous table of contents line."
580 (interactive "p") 580 (interactive "p")
581 (re-search-backward "^ " nil t arg)) 581 (re-search-backward "^ " nil t arg))
582(defun reftex-select-quit () 582(defun reftex-select-quit ()
diff --git a/lisp/textmodes/rst.el b/lisp/textmodes/rst.el
index 81e92487eb0..64dffe78d50 100644
--- a/lisp/textmodes/rst.el
+++ b/lisp/textmodes/rst.el
@@ -2716,7 +2716,7 @@ general but you do not like the details."
2716 (rst-define-level-faces))) 2716 (rst-define-level-faces)))
2717 2717
2718;; Faces for displaying items on several levels; these definitions define 2718;; Faces for displaying items on several levels; these definitions define
2719;; different shades of grey where the lightest one (i.e. least contrasting) is 2719;; different shades of gray where the lightest one (i.e. least contrasting) is
2720;; used for level 1 2720;; used for level 1
2721(defcustom rst-level-face-max 6 2721(defcustom rst-level-face-max 6
2722 "Maximum depth of levels for which section title faces are defined." 2722 "Maximum depth of levels for which section title faces are defined."
diff --git a/lisp/textmodes/table.el b/lisp/textmodes/table.el
index 08a45b6b302..65f6d98ef79 100644
--- a/lisp/textmodes/table.el
+++ b/lisp/textmodes/table.el
@@ -173,19 +173,19 @@
173;; +-------------------------------+----------------------------------+ 173;; +-------------------------------+----------------------------------+
174;; |`table-recognize' |Recognize all tables in the | 174;; |`table-recognize' |Recognize all tables in the |
175;; |`table-unrecognize' |current buffer and | 175;; |`table-unrecognize' |current buffer and |
176;; | |activate/inactivate them. | 176;; | |activate/deactivate them. |
177;; +-------------------------------+----------------------------------+ 177;; +-------------------------------+----------------------------------+
178;; |`table-recognize-region' |Recognize all the cells in a | 178;; |`table-recognize-region' |Recognize all the cells in a |
179;; |`table-unrecognize-region' |region and activate/inactivate | 179;; |`table-unrecognize-region' |region and activate/deactivate |
180;; | |them. | 180;; | |them. |
181;; +-------------------------------+----------------------------------+ 181;; +-------------------------------+----------------------------------+
182;; |`table-recognize-table' |Recognize all the cells in a | 182;; |`table-recognize-table' |Recognize all the cells in a |
183;; |`table-unrecognize-table' |single table and | 183;; |`table-unrecognize-table' |single table and |
184;; | |activate/inactivate them. | 184;; | |activate/deactivate them. |
185;; +-------------------------------+----------------------------------+ 185;; +-------------------------------+----------------------------------+
186;; |`table-recognize-cell' |Recognize a cell. Find a cell | 186;; |`table-recognize-cell' |Recognize a cell. Find a cell |
187;; |`table-unrecognize-cell' |which contains the current point | 187;; |`table-unrecognize-cell' |which contains the current point |
188;; | |and activate/inactivate that cell.| 188;; | |and activate/deactivate that cell.|
189;; +-------------------------------+----------------------------------+ 189;; +-------------------------------+----------------------------------+
190;; |`table-forward-cell' |Move point to the next Nth cell in| 190;; |`table-forward-cell' |Move point to the next Nth cell in|
191;; | |a table. | 191;; | |a table. |
@@ -3856,7 +3856,7 @@ companion command to `table-capture' this way.
3856;;;###autoload 3856;;;###autoload
3857(defun table-release () 3857(defun table-release ()
3858 "Convert a table into plain text by removing the frame from a table. 3858 "Convert a table into plain text by removing the frame from a table.
3859Remove the frame from a table and inactivate the table. This command 3859Remove the frame from a table and deactivate the table. This command
3860converts a table into plain text without frames. It is a companion to 3860converts a table into plain text without frames. It is a companion to
3861`table-capture' which does the opposite process." 3861`table-capture' which does the opposite process."
3862 (interactive) 3862 (interactive)
diff --git a/lisp/textmodes/tex-mode.el b/lisp/textmodes/tex-mode.el
index c4892ce572c..34bd24fba3a 100644
--- a/lisp/textmodes/tex-mode.el
+++ b/lisp/textmodes/tex-mode.el
@@ -2254,7 +2254,7 @@ Only applies the FSPEC to the args part of FORMAT."
2254 ;; Remove those commands whose input was considered stable for 2254 ;; Remove those commands whose input was considered stable for
2255 ;; some other command (typically if (t . "%.pdf") is inactive 2255 ;; some other command (typically if (t . "%.pdf") is inactive
2256 ;; then we're using pdflatex and the fact that the dvi file 2256 ;; then we're using pdflatex and the fact that the dvi file
2257 ;; is inexistent doesn't matter). 2257 ;; is nonexistent doesn't matter).
2258 (let ((tmp nil)) 2258 (let ((tmp nil))
2259 (dolist (cmd cmds) 2259 (dolist (cmd cmds)
2260 (unless (member (nth 1 cmd) unchanged-in) 2260 (unless (member (nth 1 cmd) unchanged-in)
diff --git a/lisp/textmodes/texinfmt.el b/lisp/textmodes/texinfmt.el
index 094885bb0d0..a337d6f9f40 100644
--- a/lisp/textmodes/texinfmt.el
+++ b/lisp/textmodes/texinfmt.el
@@ -518,7 +518,7 @@ if large. You can use `Info-split' to do this manually."
518 518
519;;; Handle paragraph filling 519;;; Handle paragraph filling
520 520
521;; Keep as concatinated lists for ease of maintenance 521;; Keep as concatenated lists for ease of maintenance
522 522
523(defvar texinfo-no-refill-regexp 523(defvar texinfo-no-refill-regexp
524 (concat 524 (concat
@@ -4238,7 +4238,7 @@ the @ifeq command."
4238Must be used only with -batch, and kills Emacs on completion. 4238Must be used only with -batch, and kills Emacs on completion.
4239Each file will be processed even if an error occurred previously. 4239Each file will be processed even if an error occurred previously.
4240For example, invoke 4240For example, invoke
4241 \"emacs -batch -funcall batch-texinfo-format $docs/ ~/*.texinfo\"." 4241 \"emacs -batch -l texinfmt -f batch-texinfo-format $docs/ ~/*.texinfo\"."
4242 (if (not noninteractive) 4242 (if (not noninteractive)
4243 (error "batch-texinfo-format may only be used -batch")) 4243 (error "batch-texinfo-format may only be used -batch"))
4244 (let ((version-control t) 4244 (let ((version-control t)