diff options
| author | Paul Eggert | 2012-05-28 23:16:49 -0700 |
|---|---|---|
| committer | Paul Eggert | 2012-05-28 23:16:49 -0700 |
| commit | c846da43835e99fa53c772814aa43c9ae7ac571b (patch) | |
| tree | 600a59a1a82be54023d58c1d82f9b2847becd07d | |
| parent | b8f061b373e606e5ba757870ffa25b36c0df2d83 (diff) | |
| download | emacs-c846da43835e99fa53c772814aa43c9ae7ac571b.tar.gz emacs-c846da43835e99fa53c772814aa43c9ae7ac571b.zip | |
Spelling fixes.
| -rw-r--r-- | etc/ORG-NEWS | 6 | ||||
| -rw-r--r-- | lisp/ChangeLog | 2 | ||||
| -rw-r--r-- | lisp/ChangeLog.15 | 2 | ||||
| -rw-r--r-- | lisp/ChangeLog.9 | 2 | ||||
| -rw-r--r-- | lisp/comint.el | 2 | ||||
| -rw-r--r-- | lisp/gnus/ChangeLog.1 | 2 | ||||
| -rw-r--r-- | lisp/gnus/gnus-win.el | 2 | ||||
| -rw-r--r-- | lisp/image-mode.el | 2 | ||||
| -rw-r--r-- | lisp/net/soap-client.el | 2 | ||||
| -rw-r--r-- | lisp/net/soap-inspect.el | 2 | ||||
| -rw-r--r-- | lisp/org/org-agenda.el | 2 | ||||
| -rw-r--r-- | lisp/org/org-remember.el | 2 | ||||
| -rw-r--r-- | lisp/org/org.el | 2 | ||||
| -rw-r--r-- | lisp/progmodes/verilog-mode.el | 4 | ||||
| -rw-r--r-- | lisp/textmodes/rst.el | 34 |
15 files changed, 34 insertions, 34 deletions
diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS index a6b31cf1249..2cfa08f1286 100644 --- a/etc/ORG-NEWS +++ b/etc/ORG-NEWS | |||
| @@ -20,7 +20,7 @@ Please send Org bug reports to emacs-orgmode@gnu.org. | |||
| 20 | :PROPERTIES: | 20 | :PROPERTIES: |
| 21 | :OrgVersion: 7.4 | 21 | :OrgVersion: 7.4 |
| 22 | :END: | 22 | :END: |
| 23 | 23 | ||
| 24 | The variable =org-agenda-ndays= is obsolete - please use | 24 | The variable =org-agenda-ndays= is obsolete - please use |
| 25 | =org-agenda-span= instead. | 25 | =org-agenda-span= instead. |
| 26 | 26 | ||
| @@ -313,7 +313,7 @@ to mean anything. | |||
| 313 | :OrgVersion: 7.5 | 313 | :OrgVersion: 7.5 |
| 314 | :END: | 314 | :END: |
| 315 | 315 | ||
| 316 | You can now create links from messages. This is particularily | 316 | You can now create links from messages. This is particularly |
| 317 | useful when the user wants to stored messages that he sends, for | 317 | useful when the user wants to stored messages that he sends, for |
| 318 | later check. Thanks to Ulf Stegemann for the patch. | 318 | later check. Thanks to Ulf Stegemann for the patch. |
| 319 | 319 | ||
| @@ -328,7 +328,7 @@ to mean anything. | |||
| 328 | 328 | ||
| 329 | : Percent escaping is used in Org mode to escape certain characters | 329 | : Percent escaping is used in Org mode to escape certain characters |
| 330 | : in links that would either break the parser (e.g. square brackets | 330 | : in links that would either break the parser (e.g. square brackets |
| 331 | : in link target oder description) or are not allowed to appear in | 331 | : in link target or description) or are not allowed to appear in |
| 332 | : a particular link type (e.g. non-ascii characters in a http: | 332 | : a particular link type (e.g. non-ascii characters in a http: |
| 333 | : link). | 333 | : link). |
| 334 | : | 334 | : |
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 68e8b764ec4..17664888135 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -906,7 +906,7 @@ | |||
| 906 | 2012-05-03 Kenichi Handa <handa@m17n.org> | 906 | 2012-05-03 Kenichi Handa <handa@m17n.org> |
| 907 | 907 | ||
| 908 | * mail/rmailmm.el (rmail-show-mime): Catch an error caused by text | 908 | * mail/rmailmm.el (rmail-show-mime): Catch an error caused by text |
| 909 | decoding, and show a warning message without signalling an error | 909 | decoding, and show a warning message without signaling an error |
| 910 | (Bug#11282). | 910 | (Bug#11282). |
| 911 | 911 | ||
| 912 | 2012-05-03 Stefan Monnier <monnier@iro.umontreal.ca> | 912 | 2012-05-03 Stefan Monnier <monnier@iro.umontreal.ca> |
diff --git a/lisp/ChangeLog.15 b/lisp/ChangeLog.15 index e3890b80ec4..65a7baf44c4 100644 --- a/lisp/ChangeLog.15 +++ b/lisp/ChangeLog.15 | |||
| @@ -9023,7 +9023,7 @@ | |||
| 9023 | * bookmark.el (bookmark-show-annotation): Use `when' instead of `if'. | 9023 | * bookmark.el (bookmark-show-annotation): Use `when' instead of `if'. |
| 9024 | This is also from Thierry Volpiatto's patch in bug #6444. However, | 9024 | This is also from Thierry Volpiatto's patch in bug #6444. However, |
| 9025 | because it was extraneous to the functional change in that patch, | 9025 | because it was extraneous to the functional change in that patch, |
| 9026 | and causes a re-indendation, I am committing it separately. | 9026 | and causes a re-indentation, I am committing it separately. |
| 9027 | 9027 | ||
| 9028 | 2010-07-13 Thierry Volpiatto <thierry.volpiatto@gmail.com> | 9028 | 2010-07-13 Thierry Volpiatto <thierry.volpiatto@gmail.com> |
| 9029 | 9029 | ||
diff --git a/lisp/ChangeLog.9 b/lisp/ChangeLog.9 index b9b6cd5a03d..5c01f872994 100644 --- a/lisp/ChangeLog.9 +++ b/lisp/ChangeLog.9 | |||
| @@ -17245,7 +17245,7 @@ | |||
| 17245 | (antlr-downcase-literals): New command. | 17245 | (antlr-downcase-literals): New command. |
| 17246 | (antlr-upcase-literals): Ditto. | 17246 | (antlr-upcase-literals): Ditto. |
| 17247 | 17247 | ||
| 17248 | * antlr-mode.el: Minor changes: indendation, mode-name. | 17248 | * antlr-mode.el: Minor changes: indentation, mode-name. |
| 17249 | (antlr-indent-line): Indent cpp directive at column 0. | 17249 | (antlr-indent-line): Indent cpp directive at column 0. |
| 17250 | (antlr-mode): Use mode-name prefix "Antlr." instead of "Antlr/". | 17250 | (antlr-mode): Use mode-name prefix "Antlr." instead of "Antlr/". |
| 17251 | 17251 | ||
diff --git a/lisp/comint.el b/lisp/comint.el index db0f5b8b460..d3274eb1164 100644 --- a/lisp/comint.el +++ b/lisp/comint.el | |||
| @@ -2969,7 +2969,7 @@ This is a good thing to set in mode hooks.") | |||
| 2969 | Word constituents are considered to be those in WORD-CHARS, which is like the | 2969 | Word constituents are considered to be those in WORD-CHARS, which is like the |
| 2970 | inside of a \"[...]\" (see `skip-chars-forward'), plus all non-ASCII characters." | 2970 | inside of a \"[...]\" (see `skip-chars-forward'), plus all non-ASCII characters." |
| 2971 | ;; FIXME: Need to handle "..." and '...' quoting in shell.el! | 2971 | ;; FIXME: Need to handle "..." and '...' quoting in shell.el! |
| 2972 | ;; This should be combined with pomplete-parsing somehow. | 2972 | ;; This should be combined with completion parsing somehow. |
| 2973 | (save-excursion | 2973 | (save-excursion |
| 2974 | (let ((here (point)) | 2974 | (let ((here (point)) |
| 2975 | giveup) | 2975 | giveup) |
diff --git a/lisp/gnus/ChangeLog.1 b/lisp/gnus/ChangeLog.1 index f3ba7bca4d4..f223bd77085 100644 --- a/lisp/gnus/ChangeLog.1 +++ b/lisp/gnus/ChangeLog.1 | |||
| @@ -2966,7 +2966,7 @@ | |||
| 2966 | 2966 | ||
| 2967 | 1997-11-25 Lars Magne Ingebrigtsen <larsi@ifi.uio.no> | 2967 | 1997-11-25 Lars Magne Ingebrigtsen <larsi@ifi.uio.no> |
| 2968 | 2968 | ||
| 2969 | * gnus-move.el (gnus-move-group-to-server): Protect agains | 2969 | * gnus-move.el (gnus-move-group-to-server): Protect against |
| 2970 | nil-ness. | 2970 | nil-ness. |
| 2971 | 2971 | ||
| 2972 | 1997-11-25 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no> | 2972 | 1997-11-25 Lars Magne Ingebrigtsen <larsi@menja.ifi.uio.no> |
diff --git a/lisp/gnus/gnus-win.el b/lisp/gnus/gnus-win.el index 34c6c0ca126..efe2a319854 100644 --- a/lisp/gnus/gnus-win.el +++ b/lisp/gnus/gnus-win.el | |||
| @@ -275,7 +275,7 @@ See the Gnus manual for an explanation of the syntax used.") | |||
| 275 | (set-buffer buf)) | 275 | (set-buffer buf)) |
| 276 | ((eq t (window-dedicated-p)) | 276 | ((eq t (window-dedicated-p)) |
| 277 | ;; If the window is hard-dedicated, we have a problem because | 277 | ;; If the window is hard-dedicated, we have a problem because |
| 278 | ;; we just can't do what we're asked. But signalling an error, | 278 | ;; we just can't do what we're asked. But signaling an error, |
| 279 | ;; like `switch-to-buffer' would do, is not an option because | 279 | ;; like `switch-to-buffer' would do, is not an option because |
| 280 | ;; it would prevent things like "^" (to jump to the *Servers*) | 280 | ;; it would prevent things like "^" (to jump to the *Servers*) |
| 281 | ;; in a dedicated *Group*. | 281 | ;; in a dedicated *Group*. |
diff --git a/lisp/image-mode.el b/lisp/image-mode.el index 8329c02fb0d..46ce6aa14d3 100644 --- a/lisp/image-mode.el +++ b/lisp/image-mode.el | |||
| @@ -663,7 +663,7 @@ The rotation angle is the value of `image-transform-rotation' in degrees." | |||
| 663 | ;; The following comment and code snippet are from | 663 | ;; The following comment and code snippet are from |
| 664 | ;; ImageMagick-6.7.4-4/magick/distort.c | 664 | ;; ImageMagick-6.7.4-4/magick/distort.c |
| 665 | 665 | ||
| 666 | ;; /* Set the output image geometry to calculated 'bestfit'. | 666 | ;; /* Set the output image geometry to calculated 'best fit'. |
| 667 | ;; Yes this tends to 'over do' the file image size, ON PURPOSE! | 667 | ;; Yes this tends to 'over do' the file image size, ON PURPOSE! |
| 668 | ;; Do not do this for DePolar which needs to be exact for virtual tiling. | 668 | ;; Do not do this for DePolar which needs to be exact for virtual tiling. |
| 669 | ;; */ | 669 | ;; */ |
diff --git a/lisp/net/soap-client.el b/lisp/net/soap-client.el index 39369111935..93ba0a7e167 100644 --- a/lisp/net/soap-client.el +++ b/lisp/net/soap-client.el | |||
| @@ -1569,7 +1569,7 @@ instead." | |||
| 1569 | (defun soap-encode-simple-type (xml-tag value type) | 1569 | (defun soap-encode-simple-type (xml-tag value type) |
| 1570 | "Encode inside XML-TAG the LISP VALUE according to TYPE." | 1570 | "Encode inside XML-TAG the LISP VALUE according to TYPE." |
| 1571 | 1571 | ||
| 1572 | ;; Validate VALUE agains the simple type's enumeration, than just encode it | 1572 | ;; Validate VALUE against the simple type's enumeration, than just encode it |
| 1573 | ;; using `soap-encode-basic-type' | 1573 | ;; using `soap-encode-basic-type' |
| 1574 | 1574 | ||
| 1575 | (let ((enumeration (soap-simple-type-enumeration type))) | 1575 | (let ((enumeration (soap-simple-type-enumeration type))) |
diff --git a/lisp/net/soap-inspect.el b/lisp/net/soap-inspect.el index 23937e21770..877ac71f4c1 100644 --- a/lisp/net/soap-inspect.el +++ b/lisp/net/soap-inspect.el | |||
| @@ -67,7 +67,7 @@ use `soap-sample-value' instead." | |||
| 67 | (t (format "%s" (soap-basic-type-kind type))))) | 67 | (t (format "%s" (soap-basic-type-kind type))))) |
| 68 | 68 | ||
| 69 | (defun soap-sample-value-for-simple-type (type) | 69 | (defun soap-sample-value-for-simple-type (type) |
| 70 | "Provive a sample value for TYPE which is a simple type. | 70 | "Provide a sample value for TYPE which is a simple type. |
| 71 | This is a specific function which should not be called directly, | 71 | This is a specific function which should not be called directly, |
| 72 | use `soap-sample-value' instead." | 72 | use `soap-sample-value' instead." |
| 73 | (let ((enumeration (soap-simple-type-enumeration type))) | 73 | (let ((enumeration (soap-simple-type-enumeration type))) |
diff --git a/lisp/org/org-agenda.el b/lisp/org/org-agenda.el index 367d8e84471..2b4a001979b 100644 --- a/lisp/org/org-agenda.el +++ b/lisp/org/org-agenda.el | |||
| @@ -799,7 +799,7 @@ because you will take care of it on the day when scheduled." | |||
| 799 | :group 'org-agenda-daily/weekly | 799 | :group 'org-agenda-daily/weekly |
| 800 | :version "24.1" | 800 | :version "24.1" |
| 801 | :type '(choice | 801 | :type '(choice |
| 802 | (const :tag "Alwas show prewarning" nil) | 802 | (const :tag "Always show prewarning" nil) |
| 803 | (const :tag "Remove prewarning if entry is scheduled" t) | 803 | (const :tag "Remove prewarning if entry is scheduled" t) |
| 804 | (integer :tag "Restart prewarning N days before deadline"))) | 804 | (integer :tag "Restart prewarning N days before deadline"))) |
| 805 | 805 | ||
diff --git a/lisp/org/org-remember.el b/lisp/org/org-remember.el index 65e92bab016..d1d863c2845 100644 --- a/lisp/org/org-remember.el +++ b/lisp/org/org-remember.el | |||
| @@ -64,7 +64,7 @@ and `org-remember-default-headline'. To force prompting anyway, use | |||
| 64 | \\[universal-argument] \\[org-remember-finalize] to file the note. | 64 | \\[universal-argument] \\[org-remember-finalize] to file the note. |
| 65 | 65 | ||
| 66 | When this variable is nil, \\[org-remember-finalize] gives you the prompts, and | 66 | When this variable is nil, \\[org-remember-finalize] gives you the prompts, and |
| 67 | \\[universal-argument] \\[org-remember-finalize] triggers the fasttrack." | 67 | \\[universal-argument] \\[org-remember-finalize] triggers the fast track." |
| 68 | :group 'org-remember | 68 | :group 'org-remember |
| 69 | :type 'boolean) | 69 | :type 'boolean) |
| 70 | 70 | ||
diff --git a/lisp/org/org.el b/lisp/org/org.el index 972f7801afc..f431c19bf51 100644 --- a/lisp/org/org.el +++ b/lisp/org/org.el | |||
| @@ -3031,7 +3031,7 @@ is better to limit inheritance to certain tags using the variables | |||
| 3031 | (const :tag "List them, indented with leading dots" indented))) | 3031 | (const :tag "List them, indented with leading dots" indented))) |
| 3032 | 3032 | ||
| 3033 | (defcustom org-tags-sort-function nil | 3033 | (defcustom org-tags-sort-function nil |
| 3034 | "When set, tags are sorted using this function as a comparator." | 3034 | "When set, tags are sorted using this comparison function." |
| 3035 | :group 'org-tags | 3035 | :group 'org-tags |
| 3036 | :type '(choice | 3036 | :type '(choice |
| 3037 | (const :tag "No sorting" nil) | 3037 | (const :tag "No sorting" nil) |
diff --git a/lisp/progmodes/verilog-mode.el b/lisp/progmodes/verilog-mode.el index 0cd8d01aff1..c072754e66d 100644 --- a/lisp/progmodes/verilog-mode.el +++ b/lisp/progmodes/verilog-mode.el | |||
| @@ -12105,7 +12105,7 @@ Typing \\[verilog-auto] will make this into: | |||
| 12105 | "Expand AUTOUNDEF statements, as part of \\[verilog-auto]. | 12105 | "Expand AUTOUNDEF statements, as part of \\[verilog-auto]. |
| 12106 | Take any `defines since the last AUTOUNDEF in the current file | 12106 | Take any `defines since the last AUTOUNDEF in the current file |
| 12107 | and create `undefs for them. This is used to insure that | 12107 | and create `undefs for them. This is used to insure that |
| 12108 | file-local defines do not polute the global `define name space. | 12108 | file-local defines do not pollute the global `define name space. |
| 12109 | 12109 | ||
| 12110 | Limitations: | 12110 | Limitations: |
| 12111 | AUTOUNDEF presumes any identifier following `define is the | 12111 | AUTOUNDEF presumes any identifier following `define is the |
| @@ -12145,7 +12145,7 @@ defines the regular expression will be undefed." | |||
| 12145 | (end-pt (point)) | 12145 | (end-pt (point)) |
| 12146 | defs def) | 12146 | defs def) |
| 12147 | (save-excursion | 12147 | (save-excursion |
| 12148 | ;; Scan from beginnng of file, or last AUTOUNDEF | 12148 | ;; Scan from start of file, or last AUTOUNDEF |
| 12149 | (or (verilog-re-search-backward-quick "/\\*AUTOUNDEF\\>" end-pt t) | 12149 | (or (verilog-re-search-backward-quick "/\\*AUTOUNDEF\\>" end-pt t) |
| 12150 | (goto-char (point-min))) | 12150 | (goto-char (point-min))) |
| 12151 | (while (verilog-re-search-forward-quick | 12151 | (while (verilog-re-search-forward-quick |
diff --git a/lisp/textmodes/rst.el b/lisp/textmodes/rst.el index 262a49e2668..c7da1fb5f80 100644 --- a/lisp/textmodes/rst.el +++ b/lisp/textmodes/rst.el | |||
| @@ -446,7 +446,7 @@ For the keyword `:alt' the results form an alternative (\"\\|\") | |||
| 446 | which is shy-grouped (\"\\(?:...\\)\"). | 446 | which is shy-grouped (\"\\(?:...\\)\"). |
| 447 | 447 | ||
| 448 | For the keyword `:grp' the results are concatenated and form a | 448 | For the keyword `:grp' the results are concatenated and form a |
| 449 | referencable grouped (\"\\(...\\)\"). | 449 | referenceable grouped (\"\\(...\\)\"). |
| 450 | 450 | ||
| 451 | After interpretation of ARGS the results are concatenated as for | 451 | After interpretation of ARGS the results are concatenated as for |
| 452 | `:seq'. | 452 | `:seq'. |
| @@ -1066,11 +1066,11 @@ Return nil if no syntactically valid adornment is found." | |||
| 1066 | (beg-pnt (progn | 1066 | (beg-pnt (progn |
| 1067 | (forward-line 0) | 1067 | (forward-line 0) |
| 1068 | (point))) | 1068 | (point))) |
| 1069 | (nxt-emp ; Next line inexistant or empty | 1069 | (nxt-emp ; Next line nonexistent or empty |
| 1070 | (save-excursion | 1070 | (save-excursion |
| 1071 | (or (not (zerop (forward-line 1))) | 1071 | (or (not (zerop (forward-line 1))) |
| 1072 | (looking-at (rst-re 'lin-end))))) | 1072 | (looking-at (rst-re 'lin-end))))) |
| 1073 | (prv-emp ; Previous line inexistant or empty | 1073 | (prv-emp ; Previous line nonexistent or empty |
| 1074 | (save-excursion | 1074 | (save-excursion |
| 1075 | (or (not (zerop (forward-line -1))) | 1075 | (or (not (zerop (forward-line -1))) |
| 1076 | (looking-at (rst-re 'lin-end))))) | 1076 | (looking-at (rst-re 'lin-end))))) |
| @@ -1917,7 +1917,7 @@ Other situations are just ignored and left to users themselves." | |||
| 1917 | "Insert a new list item. | 1917 | "Insert a new list item. |
| 1918 | 1918 | ||
| 1919 | User is asked to select the item style first, for example (a), i), +. Use TAB | 1919 | User is asked to select the item style first, for example (a), i), +. Use TAB |
| 1920 | for completition and choices. | 1920 | for completion and choices. |
| 1921 | 1921 | ||
| 1922 | If user selects bullets or #, it's just added with position arranged by | 1922 | If user selects bullets or #, it's just added with position arranged by |
| 1923 | `rst-insert-list-pos'. | 1923 | `rst-insert-list-pos'. |
| @@ -2020,7 +2020,7 @@ line, it will insert a list with the same list style. | |||
| 2020 | 1. When inserting a new list: | 2020 | 1. When inserting a new list: |
| 2021 | 2021 | ||
| 2022 | User is asked to select the item style first, for example (a), i), +. Use TAB | 2022 | User is asked to select the item style first, for example (a), i), +. Use TAB |
| 2023 | for completition and choices. | 2023 | for completion and choices. |
| 2024 | 2024 | ||
| 2025 | (a) If user selects bullets or #, it's just added. | 2025 | (a) If user selects bullets or #, it's just added. |
| 2026 | (b) If user selects enumerations, a further prompt is given. User needs to | 2026 | (b) If user selects enumerations, a further prompt is given. User needs to |
| @@ -2754,11 +2754,11 @@ first of a paragraph." | |||
| 2754 | ;; supported; comment lines with leading comment markup should be also | 2754 | ;; supported; comment lines with leading comment markup should be also |
| 2755 | ;; supported; may be a customizable option could control which style to prefer | 2755 | ;; supported; may be a customizable option could control which style to prefer |
| 2756 | 2756 | ||
| 2757 | (defgroup rst-indent nil "Settings for indendation in reStructuredText. | 2757 | (defgroup rst-indent nil "Settings for indentation in reStructuredText. |
| 2758 | 2758 | ||
| 2759 | In reStructuredText indendation points are usually determined by | 2759 | In reStructuredText indentation points are usually determined by |
| 2760 | preceding lines. Sometimes the syntax allows arbitrary | 2760 | preceding lines. Sometimes the syntax allows arbitrary |
| 2761 | indendation points such as where to start the first line | 2761 | indentation points such as where to start the first line |
| 2762 | following a directive. These indentation widths can be customized | 2762 | following a directive. These indentation widths can be customized |
| 2763 | here." | 2763 | here." |
| 2764 | :group 'rst | 2764 | :group 'rst |
| @@ -2772,25 +2772,25 @@ here." | |||
| 2772 | :type '(integer)) | 2772 | :type '(integer)) |
| 2773 | 2773 | ||
| 2774 | (defcustom rst-indent-field 3 | 2774 | (defcustom rst-indent-field 3 |
| 2775 | "Default indendation for first line after a field or 0 to always indent for | 2775 | "Default indentation for first line after a field or 0 to always indent for |
| 2776 | content." | 2776 | content." |
| 2777 | :group 'rst-indent | 2777 | :group 'rst-indent |
| 2778 | :type '(integer)) | 2778 | :type '(integer)) |
| 2779 | 2779 | ||
| 2780 | (defcustom rst-indent-literal-normal 3 | 2780 | (defcustom rst-indent-literal-normal 3 |
| 2781 | "Default indendation for literal block after a markup on an own | 2781 | "Default indentation for literal block after a markup on an own |
| 2782 | line." | 2782 | line." |
| 2783 | :group 'rst-indent | 2783 | :group 'rst-indent |
| 2784 | :type '(integer)) | 2784 | :type '(integer)) |
| 2785 | 2785 | ||
| 2786 | (defcustom rst-indent-literal-minimized 2 | 2786 | (defcustom rst-indent-literal-minimized 2 |
| 2787 | "Default indendation for literal block after a minimized | 2787 | "Default indentation for literal block after a minimized |
| 2788 | markup." | 2788 | markup." |
| 2789 | :group 'rst-indent | 2789 | :group 'rst-indent |
| 2790 | :type '(integer)) | 2790 | :type '(integer)) |
| 2791 | 2791 | ||
| 2792 | (defcustom rst-indent-comment 3 | 2792 | (defcustom rst-indent-comment 3 |
| 2793 | "Default indendation for first line of a comment." | 2793 | "Default indentation for first line of a comment." |
| 2794 | :group 'rst-indent | 2794 | :group 'rst-indent |
| 2795 | :type '(integer)) | 2795 | :type '(integer)) |
| 2796 | 2796 | ||
| @@ -2810,7 +2810,7 @@ and not from inner alignment points." | |||
| 2810 | (save-match-data | 2810 | (save-match-data |
| 2811 | (unless (looking-at (rst-re 'lin-end)) | 2811 | (unless (looking-at (rst-re 'lin-end)) |
| 2812 | (back-to-indentation) | 2812 | (back-to-indentation) |
| 2813 | ;; Current indendation is always the least likely tab | 2813 | ;; Current indentation is always the least likely tab |
| 2814 | (let ((tabs (list (list (point) 0 nil)))) ; (POINT OFFSET INNER) | 2814 | (let ((tabs (list (list (point) 0 nil)))) ; (POINT OFFSET INNER) |
| 2815 | ;; Push inner tabs more likely to continue writing | 2815 | ;; Push inner tabs more likely to continue writing |
| 2816 | (cond | 2816 | (cond |
| @@ -2863,7 +2863,7 @@ and not from inner alignment points." | |||
| 2863 | Search backwards from point PT to build the list of possible | 2863 | Search backwards from point PT to build the list of possible |
| 2864 | tabs. Return a list of tabs sorted by likeliness to continue | 2864 | tabs. Return a list of tabs sorted by likeliness to continue |
| 2865 | writing like `rst-line-tabs'. Nearer lines have generally a | 2865 | writing like `rst-line-tabs'. Nearer lines have generally a |
| 2866 | higher likeliness than farer lines. Return nil if no tab is found | 2866 | higher likeliness than farther lines. Return nil if no tab is found |
| 2867 | in the text above." | 2867 | in the text above." |
| 2868 | (save-excursion | 2868 | (save-excursion |
| 2869 | (goto-char pt) | 2869 | (goto-char pt) |
| @@ -3452,7 +3452,7 @@ details check the Rst Faces Defaults group." | |||
| 3452 | 1 rst-definition-face) | 3452 | 1 rst-definition-face) |
| 3453 | ;; `Hyperlink References`_ | 3453 | ;; `Hyperlink References`_ |
| 3454 | ;; FIXME: `Embedded URIs`_ not considered | 3454 | ;; FIXME: `Embedded URIs`_ not considered |
| 3455 | ;; FIXME: Directly adjacing marked up words are not fontified correctly | 3455 | ;; FIXME: Directly adjacent marked up words are not fontified correctly |
| 3456 | ;; unless they are not separated by two spaces: foo_ bar_ | 3456 | ;; unless they are not separated by two spaces: foo_ bar_ |
| 3457 | (,(rst-re 'ilm-pfx '(:grp (:alt (:seq "`" ilcbkq-tag "`") | 3457 | (,(rst-re 'ilm-pfx '(:grp (:alt (:seq "`" ilcbkq-tag "`") |
| 3458 | (:seq "\\sw" (:alt "\\sw" "-") "+\\sw")) | 3458 | (:seq "\\sw" (:alt "\\sw" "-") "+\\sw")) |
| @@ -3610,7 +3610,7 @@ Return extended point or nil if not moved." | |||
| 3610 | ;; | 3610 | ;; |
| 3611 | ;; * literal blocks following "::" | 3611 | ;; * literal blocks following "::" |
| 3612 | ;; | 3612 | ;; |
| 3613 | ;; which are both indented. Thus indendation is the first thing recognized | 3613 | ;; which are both indented. Thus indentation is the first thing recognized |
| 3614 | ;; here. The second criteria is an explicit markup tag which may be a comment | 3614 | ;; here. The second criteria is an explicit markup tag which may be a comment |
| 3615 | ;; or a double colon at the end of a line. | 3615 | ;; or a double colon at the end of a line. |
| 3616 | ;; | 3616 | ;; |
| @@ -3697,7 +3697,7 @@ Also used as a trigger for | |||
| 3697 | `rst-font-lock-find-unindented-line-match'.") | 3697 | `rst-font-lock-find-unindented-line-match'.") |
| 3698 | 3698 | ||
| 3699 | (defun rst-font-lock-find-unindented-line-limit (ind-pnt) | 3699 | (defun rst-font-lock-find-unindented-line-limit (ind-pnt) |
| 3700 | "Find the next unindented line relative to indenation at IND-PNT. | 3700 | "Find the next unindented line relative to indentation at IND-PNT. |
| 3701 | Return this point, the end of the buffer or nil if nothing found. | 3701 | Return this point, the end of the buffer or nil if nothing found. |
| 3702 | If IND-PNT is `next' take the indentation from the next line if | 3702 | If IND-PNT is `next' take the indentation from the next line if |
| 3703 | this is not empty and indented more than the current one. If | 3703 | this is not empty and indented more than the current one. If |