Mercurial > hg > xemacs-beta
diff lisp/lisp.el @ 267:966663fcf606 r20-5b32
Import from CVS: tag r20-5b32
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:26:29 +0200 |
parents | 8efd647ea9ca |
children |
line wrap: on
line diff
--- a/lisp/lisp.el Mon Aug 13 10:25:39 2007 +0200 +++ b/lisp/lisp.el Mon Aug 13 10:26:29 2007 +0200 @@ -62,8 +62,7 @@ ;; XEmacs: evil hack! The other half of the evil hack below. (if (and (> arg 0) (looking-at "#s(")) (goto-char (+ (point) 2))) - ;; XEmacs change -- don't bomb out if unbalanced sexp - (goto-char (or (scan-sexps (point) arg nil t) (buffer-end arg))) + (goto-char (or (scan-sexps (point) arg) (buffer-end arg))) (if (< arg 0) (backward-prefix-chars)) ;; XEmacs: evil hack! Skip back over #s so that structures are read ;; properly. the current cheesified syntax tables just aren't up to