Mercurial > emacs
changeset 58981:2d3d6e1fecc2
Check for && when skipping multiple commands on a line.
author | J.D. Smith <jdsmith@as.arizona.edu> |
---|---|
date | Wed, 15 Dec 2004 19:06:11 +0000 |
parents | b66ca362d233 |
children | 0d4afb943870 |
files | lisp/progmodes/idlwave.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/progmodes/idlwave.el Wed Dec 15 13:59:17 2004 +0000 +++ b/lisp/progmodes/idlwave.el Wed Dec 15 19:06:11 2004 +0000 @@ -2571,7 +2571,9 @@ (let ((save-point (point))) (when (re-search-forward ".*&" lim t) (goto-char (match-end 0)) - (if (idlwave-quoted) (goto-char save-point))) + (if (idlwave-quoted) + (goto-char save-point) + (if (eq (char-after (- (point) 2)) ?&) (goto-char save-point)))) (point))) (defun idlwave-skip-label-or-case ()