Mercurial > emacs
changeset 58562:937f83cb003d
(tcl-omit-ws-regexp): Avoid the case where { or [ appears within a string.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sat, 27 Nov 2004 00:04:16 +0000 |
| parents | 36249becd283 |
| children | 72c3587cd01b |
| files | lisp/progmodes/tcl.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/tcl.el Fri Nov 26 23:56:39 2004 +0000 +++ b/lisp/progmodes/tcl.el Sat Nov 27 00:04:16 2004 +0000 @@ -438,7 +438,7 @@ ;; proc foo { \n {arg1 def} \n arg2 } { ;; The current setting handles the first case properly but not the second. ;; It also fails if `proc' is not in column-0 (e.g. it's in a namespace). -(defconst tcl-omit-ws-regexp "^[^] \t\n#}].+[ \t]+") +(defconst tcl-omit-ws-regexp "^[^]\" \t\n#}][^\n\"]+[ \t]+")