diff options
| author | Agustín Martín | 2012-05-18 09:36:09 +0200 |
|---|---|---|
| committer | Agustín Martín | 2012-05-18 09:36:09 +0200 |
| commit | 80a511622c52f16583c549a3b16cd419a77f015e (patch) | |
| tree | f43279509d7e97fadf4ab003f4be5752f17abab0 | |
| parent | b7e1feeab6f88af3ebccbde6080e85c3cae8b340 (diff) | |
| download | emacs-80a511622c52f16583c549a3b16cd419a77f015e.tar.gz emacs-80a511622c52f16583c549a3b16cd419a77f015e.zip | |
textmodes/flyspell.el: Minor change over last 2012-05-18T07:04:04Z!agustin.martin@hispalinux.es change. Use ispell-otherchars variable.
Use ispell-otherchars variable rather than (ispell-get-otherchars).
| -rw-r--r-- | lisp/textmodes/flyspell.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 89134a1d355..af924dd403b 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el | |||
| @@ -828,7 +828,7 @@ Mostly we check word delimiters." | |||
| 828 | (backward-char 1) | 828 | (backward-char 1) |
| 829 | (and (looking-at (flyspell-get-not-casechars)) | 829 | (and (looking-at (flyspell-get-not-casechars)) |
| 830 | (or (string= "" ispell-otherchars) | 830 | (or (string= "" ispell-otherchars) |
| 831 | (not (looking-at (ispell-get-otherchars)))) | 831 | (not (looking-at ispell-otherchars))) |
| 832 | (or flyspell-consider-dash-as-word-delimiter-flag | 832 | (or flyspell-consider-dash-as-word-delimiter-flag |
| 833 | (not (looking-at "-")))))) | 833 | (not (looking-at "-")))))) |
| 834 | ;; yes because we have reached or typed a word delimiter. | 834 | ;; yes because we have reached or typed a word delimiter. |
| @@ -896,7 +896,7 @@ Mostly we check word delimiters." | |||
| 896 | (backward-char 1) | 896 | (backward-char 1) |
| 897 | (and (and (looking-at (flyspell-get-not-casechars)) 1) | 897 | (and (and (looking-at (flyspell-get-not-casechars)) 1) |
| 898 | (or (string= "" ispell-otherchars) | 898 | (or (string= "" ispell-otherchars) |
| 899 | (not (looking-at (ispell-get-otherchars)))) | 899 | (not (looking-at ispell-otherchars))) |
| 900 | (and (or flyspell-consider-dash-as-word-delimiter-flag | 900 | (and (or flyspell-consider-dash-as-word-delimiter-flag |
| 901 | (not (looking-at "\\-"))) 2)))))) | 901 | (not (looking-at "\\-"))) 2)))))) |
| 902 | c)))) | 902 | c)))) |
| @@ -913,7 +913,7 @@ Mostly we check word delimiters." | |||
| 913 | (backward-char 1) | 913 | (backward-char 1) |
| 914 | (and (looking-at (flyspell-get-not-casechars)) | 914 | (and (looking-at (flyspell-get-not-casechars)) |
| 915 | (or (string= "" ispell-otherchars) | 915 | (or (string= "" ispell-otherchars) |
| 916 | (not (looking-at (ispell-get-otherchars)))) | 916 | (not (looking-at ispell-otherchars))) |
| 917 | (or flyspell-consider-dash-as-word-delimiter-flag | 917 | (or flyspell-consider-dash-as-word-delimiter-flag |
| 918 | (not (looking-at "\\-")))))))) | 918 | (not (looking-at "\\-")))))))) |
| 919 | c)) | 919 | c)) |