diff options
| author | Dmitry Gutov | 2013-09-05 16:05:01 +0300 |
|---|---|---|
| committer | Dmitry Gutov | 2013-09-05 16:05:01 +0300 |
| commit | 1f896cb7ede7d658797737574b2d6b00d128a592 (patch) | |
| tree | 340f9e83618f2990745049548493cc5e9c5e9430 | |
| parent | c828af56439a823c5292839e59943e5b1f033bf6 (diff) | |
| download | emacs-1f896cb7ede7d658797737574b2d6b00d128a592.tar.gz emacs-1f896cb7ede7d658797737574b2d6b00d128a592.zip | |
* lisp/progmodes/ruby-mode.el (ruby-font-lock-keywords): Move "Perl-ish
keywords" below "here-doc beginnings".
Fixes: debbugs:15270
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/progmodes/ruby-mode.el | 4 |
2 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cd41db8708a..6929d80653e 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-09-05 Dmitry Gutov <dgutov@yandex.ru> | ||
| 2 | |||
| 3 | * progmodes/ruby-mode.el (ruby-font-lock-keywords): Move "Perl-ish | ||
| 4 | keywords" below "here-doc beginnings" (Bug#15270). | ||
| 5 | |||
| 1 | 2013-09-05 Stefan Monnier <monnier@iro.umontreal.ca> | 6 | 2013-09-05 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 7 | ||
| 3 | * subr.el (pop): Use `car-safe'. | 8 | * subr.el (pop): Use `car-safe'. |
diff --git a/lisp/progmodes/ruby-mode.el b/lisp/progmodes/ruby-mode.el index acc7738ae5c..0f868255589 100644 --- a/lisp/progmodes/ruby-mode.el +++ b/lisp/progmodes/ruby-mode.el | |||
| @@ -1862,11 +1862,11 @@ See `font-lock-syntax-table'.") | |||
| 1862 | "using") | 1862 | "using") |
| 1863 | 'symbols)) | 1863 | 'symbols)) |
| 1864 | 1 'font-lock-builtin-face) | 1864 | 1 'font-lock-builtin-face) |
| 1865 | ;; Perl-ish keywords | ||
| 1866 | "\\_<\\(?:BEGIN\\|END\\)\\_>\\|^__END__$" | ||
| 1867 | ;; here-doc beginnings | 1865 | ;; here-doc beginnings |
| 1868 | `(,ruby-here-doc-beg-re 0 (unless (ruby-singleton-class-p (match-beginning 0)) | 1866 | `(,ruby-here-doc-beg-re 0 (unless (ruby-singleton-class-p (match-beginning 0)) |
| 1869 | 'font-lock-string-face)) | 1867 | 'font-lock-string-face)) |
| 1868 | ;; Perl-ish keywords | ||
| 1869 | "\\_<\\(?:BEGIN\\|END\\)\\_>\\|^__END__$" | ||
| 1870 | ;; variables | 1870 | ;; variables |
| 1871 | `(,(concat ruby-font-lock-keyword-beg-re | 1871 | `(,(concat ruby-font-lock-keyword-beg-re |
| 1872 | "\\_<\\(nil\\|self\\|true\\|false\\)\\>") | 1872 | "\\_<\\(nil\\|self\\|true\\|false\\)\\>") |