aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPaul Eggert2017-01-17 07:45:39 -0800
committerPaul Eggert2017-01-17 07:46:03 -0800
commit021d340cf94f6670f1c45175e856f3394f7fcae1 (patch)
treefdf33b9d85502f17ecd0c7ec4f35d852940a45b6
parent2b36ae07e3c8106e4603b330fc470f0595d28de0 (diff)
downloademacs-021d340cf94f6670f1c45175e856f3394f7fcae1.tar.gz
emacs-021d340cf94f6670f1c45175e856f3394f7fcae1.zip
; Spelling fixes
-rw-r--r--lisp/textmodes/rst.el15
1 files changed, 7 insertions, 8 deletions
diff --git a/lisp/textmodes/rst.el b/lisp/textmodes/rst.el
index 06f969d2784..261e98eabce 100644
--- a/lisp/textmodes/rst.el
+++ b/lisp/textmodes/rst.el
@@ -109,7 +109,7 @@
109(def-edebug-spec push 109(def-edebug-spec push
110 (&or [form symbolp] [form gv-place])) 110 (&or [form symbolp] [form gv-place]))
111 111
112;; Correct wrong declaration. This still doesn't support dotted desctructuring 112;; Correct wrong declaration. This still doesn't support dotted destructuring
113;; though. 113;; though.
114(def-edebug-spec cl-lambda-list 114(def-edebug-spec cl-lambda-list
115 (([&rest cl-macro-arg] 115 (([&rest cl-macro-arg]
@@ -1006,7 +1006,7 @@ BEG-UND are the starting points of the overline or underline,
1006respectively. They may be nil if the respective thing is missing. 1006respectively. They may be nil if the respective thing is missing.
1007BEG-TXT is the beginning of the title line or the transition and 1007BEG-TXT is the beginning of the title line or the transition and
1008must be given. The end of the line is used as the end point. TXT 1008must be given. The end of the line is used as the end point. TXT
1009is the title text or nil. If TXT is given the indendation of the 1009is the title text or nil. If TXT is given the indentation of the
1010line containing BEG-TXT is used as indentation. Match group 0 is 1010line containing BEG-TXT is used as indentation. Match group 0 is
1011derived from the remaining information." 1011derived from the remaining information."
1012 (cl-check-type beg-txt integer-or-marker) 1012 (cl-check-type beg-txt integer-or-marker)
@@ -1845,8 +1845,7 @@ Uses and sets `rst-all-ttls-cache'."
1845HDRS reflects the order in which the headers appear in the 1845HDRS reflects the order in which the headers appear in the
1846buffer. Return a `rst-Hdr' list representing the hierarchy of 1846buffer. Return a `rst-Hdr' list representing the hierarchy of
1847headers in the buffer. Indentation is unified." 1847headers in the buffer. Indentation is unified."
1848 (let (ado2indents) ; Asscociates `rst-Ado' with the set of indents seen for 1848 (let (ado2indents) ; Associates `rst-Ado' with the set of indents seen for it.
1849 ; it.
1850 (dolist (hdr hdrs) 1849 (dolist (hdr hdrs)
1851 (let* ((ado (rst-Hdr-ado hdr)) 1850 (let* ((ado (rst-Hdr-ado hdr))
1852 (indent (rst-Hdr-indent hdr)) 1851 (indent (rst-Hdr-indent hdr))
@@ -2451,7 +2450,7 @@ also arranged by `rst-insert-list-new-tag'."
2451(defun rst-insert-list-continue (ind tag tab prefer-roman) 2450(defun rst-insert-list-continue (ind tag tab prefer-roman)
2452 ;; testcover: ok. 2451 ;; testcover: ok.
2453 "Insert a new list tag after the current line according to style. 2452 "Insert a new list tag after the current line according to style.
2454Style is defined by indentaton IND, TAG and suffix TAB. If 2453Style is defined by indentation IND, TAG and suffix TAB. If
2455PREFER-ROMAN roman numbering is preferred over using letters." 2454PREFER-ROMAN roman numbering is preferred over using letters."
2456 (end-of-line) 2455 (end-of-line)
2457 (insert 2456 (insert
@@ -2551,8 +2550,8 @@ roman numerical list, just use a prefix to set PREFER-ROMAN."
2551 "Return the positions of begs in region BEG to END. 2550 "Return the positions of begs in region BEG to END.
2552RST-RE-BEG is a `rst-re' argument and matched at the beginning of 2551RST-RE-BEG is a `rst-re' argument and matched at the beginning of
2553a line. Return a list of (POINT . COLUMN) where POINT gives the 2552a line. Return a list of (POINT . COLUMN) where POINT gives the
2554point after indentaton and COLUMN gives its column. The list is 2553point after indentation and COLUMN gives its column. The list is
2555ordererd by POINT." 2554ordered by POINT."
2556 (let (r) 2555 (let (r)
2557 (save-match-data 2556 (save-match-data
2558 (save-excursion 2557 (save-excursion
@@ -2963,7 +2962,7 @@ error if there is no working link at the given position."
2963 (unless link-buf 2962 (unless link-buf
2964 (setq link-buf (current-buffer))) 2963 (setq link-buf (current-buffer)))
2965 ;; Do not catch errors from `rst-toc-get-link' because otherwise the error is 2964 ;; Do not catch errors from `rst-toc-get-link' because otherwise the error is
2966 ;; suppressed and invisible in interactve use. 2965 ;; suppressed and invisible in interactive use.
2967 (let ((mrkr (rst-toc-get-link link-buf link-pnt))) 2966 (let ((mrkr (rst-toc-get-link link-buf link-pnt)))
2968 (condition-case nil 2967 (condition-case nil
2969 (rst-toc-mode-return kill) 2968 (rst-toc-mode-return kill)