diff options
| author | Juri Linkov | 2017-01-31 17:36:06 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2017-01-31 17:36:59 +0100 |
| commit | 18a3fccd89d04afc13ce7b4561e224874c317283 (patch) | |
| tree | 9363361a375c727ef2dc76923c166c54890fc944 | |
| parent | a727a0303eb34858389cb4331944e0e63411f2ff (diff) | |
| download | emacs-18a3fccd89d04afc13ce7b4561e224874c317283.tar.gz emacs-18a3fccd89d04afc13ce7b4561e224874c317283.zip | |
Allow C-s C-w to yank ' to the search ring in the Gnus article buffer
* lisp/gnus/gnus-art.el (gnus-article-mode-syntax-table): Make
M-. in article buffers work for `foo' strings, and still allow
C-s C-w to yank ' to the search ring (bug#22248).
| -rw-r--r-- | lisp/gnus/gnus-art.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/gnus/gnus-art.el b/lisp/gnus/gnus-art.el index 43e1231914c..a4ff840f755 100644 --- a/lisp/gnus/gnus-art.el +++ b/lisp/gnus/gnus-art.el | |||
| @@ -1713,9 +1713,10 @@ regexp." | |||
| 1713 | ;; (modify-syntax-entry ?- "w" table) | 1713 | ;; (modify-syntax-entry ?- "w" table) |
| 1714 | (modify-syntax-entry ?> ")<" table) | 1714 | (modify-syntax-entry ?> ")<" table) |
| 1715 | (modify-syntax-entry ?< "(>" table) | 1715 | (modify-syntax-entry ?< "(>" table) |
| 1716 | ;; make M-. in article buffers work for `foo' strings | 1716 | ;; make M-. in article buffers work for `foo' strings, |
| 1717 | (modify-syntax-entry ?' " " table) | 1717 | ;; and still allow C-s C-w to yank ' to the search ring |
| 1718 | (modify-syntax-entry ?` " " table) | 1718 | (modify-syntax-entry ?' "'" table) |
| 1719 | (modify-syntax-entry ?` "'" table) | ||
| 1719 | table) | 1720 | table) |
| 1720 | "Syntax table used in article mode buffers. | 1721 | "Syntax table used in article mode buffers. |
| 1721 | Initialized from `text-mode-syntax-table'.") | 1722 | Initialized from `text-mode-syntax-table'.") |