[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master dcfcc59: * lisp/progmodes/cc-engine.el (c-syntactic
From: |
Alan Mackenzie |
Subject: |
[Emacs-diffs] master dcfcc59: * lisp/progmodes/cc-engine.el (c-syntactic-re-search-forward): Fix coding bug |
Date: |
Tue, 6 Sep 2016 12:43:09 +0000 (UTC) |
branch: master
commit dcfcc595339f8bd503dedf95976b8a3633382f4f
Author: Alan Mackenzie <address@hidden>
Commit: Alan Mackenzie <address@hidden>
* lisp/progmodes/cc-engine.el (c-syntactic-re-search-forward): Fix coding
bug
---
lisp/progmodes/cc-engine.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el
index d4cb192..259f8a0 100644
--- a/lisp/progmodes/cc-engine.el
+++ b/lisp/progmodes/cc-engine.el
@@ -4516,11 +4516,12 @@ comment at the start of cc-engine.el for more info."
((not (memq noerror '(before-literal after-literal)))
(goto-char bound))
(t (setq state (parse-partial-sexp state-pos bound nil nil state))
- (when (or (elt state 3) (elt state 4))
- (if (eq noerror 'before-literal)
- (goto-char (elt state 8))
- (parse-partial-sexp bound (point-max) nil nil
- state 'syntax-table)))))
+ (if (or (elt state 3) (elt state 4))
+ (if (eq noerror 'before-literal)
+ (goto-char (elt state 8))
+ (parse-partial-sexp bound (point-max) nil nil
+ state 'syntax-table))
+ (goto-char bound))))
nil)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master dcfcc59: * lisp/progmodes/cc-engine.el (c-syntactic-re-search-forward): Fix coding bug,
Alan Mackenzie <=