aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorStefan Monnier2012-07-09 09:54:50 -0400
committerStefan Monnier2012-07-09 09:54:50 -0400
commitaa7aaf8f0bf845b57961dff1b702098e50cb16ee (patch)
tree701470de261a764d1863623491de663fa946888f
parentcb4429739a65b6a17511ef85cdcb1846c5a088c2 (diff)
downloademacs-aa7aaf8f0bf845b57961dff1b702098e50cb16ee.tar.gz
emacs-aa7aaf8f0bf845b57961dff1b702098e50cb16ee.zip
* lisp/progmodes/sh-script.el (sh-syntax-propertize-function): Fix last
change. Fixes: debbugs:11826
-rw-r--r--lisp/ChangeLog9
-rw-r--r--lisp/progmodes/sh-script.el8
2 files changed, 11 insertions, 6 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index e5f4bb8f770..1faebf5b083 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12012-07-09 Stefan Monnier <monnier@iro.umontreal.ca>
2
3 * progmodes/sh-script.el (sh-syntax-propertize-function): Fix last
4 change (bug#11826).
5
12012-07-02 Glenn Morris <rgm@gnu.org> 62012-07-02 Glenn Morris <rgm@gnu.org>
2 7
3 * simple.el (kill-whole-line): Doc tweak. 8 * simple.el (kill-whole-line): Doc tweak.
@@ -11,8 +16,8 @@
11 16
122012-06-28 Andreas Schwab <schwab@linux-m68k.org> 172012-06-28 Andreas Schwab <schwab@linux-m68k.org>
13 18
14 * calendar/cal-dst.el (calendar-current-time-zone): Return 19 * calendar/cal-dst.el (calendar-current-time-zone):
15 calendar-current-time-zone-cache if non-nil. 20 Return calendar-current-time-zone-cache if non-nil.
16 21
172012-06-25 Masatake YAMATO <yamato@redhat.com> 222012-06-25 Masatake YAMATO <yamato@redhat.com>
18 23
diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el
index 48b19524b8c..7d38df6aff6 100644
--- a/lisp/progmodes/sh-script.el
+++ b/lisp/progmodes/sh-script.el
@@ -1105,12 +1105,12 @@ subshells can nest."
1105 (")" (0 (sh-font-lock-paren (match-beginning 0)))) 1105 (")" (0 (sh-font-lock-paren (match-beginning 0))))
1106 ;; Highlight (possibly nested) subshells inside "" quoted 1106 ;; Highlight (possibly nested) subshells inside "" quoted
1107 ;; regions correctly. 1107 ;; regions correctly.
1108 ("\"\\(?:\\(?:[^\\\"]\\|\\)*?[^\\]\\(?:\\\\\\\\\\)*\\)??\\(\\$(\\|`\\)" 1108 ("\"\\(?:\\(?:[^\\\"]\\|\\\\.\\)*?\\)??\\(\\$(\\|`\\)"
1109 (1 (ignore 1109 (1 (ignore
1110 ;; Save excursion because we want to also apply other 1110 (if (nth 8 (save-excursion (syntax-ppss (match-beginning 0))))
1111 ;; syntax-propertize rules within the affected region.
1112 (if (nth 8 (syntax-ppss))
1113 (goto-char (1+ (match-beginning 0))) 1111 (goto-char (1+ (match-beginning 0)))
1112 ;; Save excursion because we want to also apply other
1113 ;; syntax-propertize rules within the affected region.
1114 (save-excursion 1114 (save-excursion
1115 (sh-font-lock-quoted-subshell end))))))) 1115 (sh-font-lock-quoted-subshell end)))))))
1116 (point) end)) 1116 (point) end))