diff options
| author | Stefan Monnier <[email protected]> | 2005-12-06 16:54:20 +0000 |
|---|---|---|
| committer | Stefan Monnier <[email protected]> | 2005-12-06 16:54:20 +0000 |
| commit | 6277435b76c79671392bc57f843a61d159759e66 (patch) | |
| tree | f497bf119c6d769ed528f68f2ab878c548163236 /lisp/progmodes/cc-defs.el | |
| parent | da8ec671f736fd22ade1ae1291d48045c62fab64 (diff) | |
(c-emacs-features): Don't assume point-min==1.
Diffstat (limited to 'lisp/progmodes/cc-defs.el')
| -rw-r--r-- | lisp/progmodes/cc-defs.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/progmodes/cc-defs.el b/lisp/progmodes/cc-defs.el index b68e167ffa..1bb76c170d 100644 --- a/lisp/progmodes/cc-defs.el +++ b/lisp/progmodes/cc-defs.el @@ -1400,11 +1400,11 @@ non-nil, a caret is prepended to invert the set." (modify-syntax-entry ?< ".") (modify-syntax-entry ?> ".") (insert "<()>") - (c-mark-<-as-paren 1) - (c-mark->-as-paren 4) - (goto-char 1) + (c-mark-<-as-paren (point-min)) + (c-mark->-as-paren (+ 3 (point-min))) + (goto-char (point-min)) (c-forward-sexp) - (if (= (point) 5) + (if (= (point) (+ 4 (point-min))) (setq list (cons 'syntax-properties list)) (error (concat "CC Mode is incompatible with this version of Emacs - " @@ -2036,5 +2036,5 @@ quoted." (cc-provide 'cc-defs) -;;; arch-tag: 3bb2629d-dd84-4ff0-ad39-584be0fe3cda +;; arch-tag: 3bb2629d-dd84-4ff0-ad39-584be0fe3cda ;;; cc-defs.el ends here |