comparison lisp/progmodes/tcl.el @ 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 03a731220a33
children 72c3587cd01b
comparison
equal deleted inserted replaced
58561:36249becd283 58562:937f83cb003d
436 ;; proc foo { {arg1 def} arg2 } { 436 ;; proc foo { {arg1 def} arg2 } {
437 ;; as well as 437 ;; as well as
438 ;; proc foo { \n {arg1 def} \n arg2 } { 438 ;; proc foo { \n {arg1 def} \n arg2 } {
439 ;; The current setting handles the first case properly but not the second. 439 ;; The current setting handles the first case properly but not the second.
440 ;; It also fails if `proc' is not in column-0 (e.g. it's in a namespace). 440 ;; It also fails if `proc' is not in column-0 (e.g. it's in a namespace).
441 (defconst tcl-omit-ws-regexp "^[^] \t\n#}].+[ \t]+") 441 (defconst tcl-omit-ws-regexp "^[^]\" \t\n#}][^\n\"]+[ \t]+")
442 442
443 443
444 444
445 ;; 445 ;;
446 ;; Some helper functions. 446 ;; Some helper functions.