Commit 9921b91a authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(tcl-omit-ws-regexp): Avoid the case where { or [ appears within a comment.

parent 60273d66
...@@ -438,7 +438,7 @@ is a Tcl expression, and the last argument is Tcl commands.") ...@@ -438,7 +438,7 @@ is a Tcl expression, and the last argument is Tcl commands.")
;; proc foo { \n {arg1 def} \n arg2 } { ;; proc foo { \n {arg1 def} \n arg2 } {
;; The current setting handles the first case properly but not the second. ;; 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). ;; It also fails if `proc' is not in column-0 (e.g. it's in a namespace).
(defconst tcl-omit-ws-regexp "^[^]\" \t\n#}][^\n\"]+[ \t]+") (defconst tcl-omit-ws-regexp "^[^]\" \t\n#}][^\n\"#]+[ \t]+")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment