BUG: Fixed identification of ( and ) tokens to avoid finding them in string literals.

This commit is contained in:
Brad King 2004-02-19 10:28:57 -05:00
parent bfe234da93
commit ece9ae97e2

View File

@ -107,10 +107,10 @@
; Search forward counting tokens that adjust indentation.
(while (re-search-forward cmake-regex-token point-start t)
(setq token (match-string 0))
(if (string-match cmake-regex-paren-left token)
(if (string-match (concat "^" cmake-regex-paren-left "$") token)
(setq cur-indent (+ cur-indent cmake-tab-width))
)
(if (string-match cmake-regex-paren-right token)
(if (string-match (concat "^" cmake-regex-paren-right "$") token)
(setq cur-indent (- cur-indent cmake-tab-width))
)
(if (string-match cmake-regex-block-open token)