Commit 63b98362 authored by Karl Heuer's avatar Karl Heuer

(viper-skip-syntax): Bug fix for eob/bob cases.

parent 6d459c4d
......@@ -1295,7 +1295,10 @@ This option is appropriate if you like Emacs-style words."
(t nil)))
(if (memq ?^ syntax) (setq negated-syntax t))
(while (and (not (= local 0)) (not (eobp)))
(while (and (not (= local 0))
(cond ((eq direction 'forward)
(not (eobp)))
(t (not (bobp)))))
(setq char-looked-at (viper-char-at-pos direction)
;; if outside the range, set to nil
syntax-of-char-looked-at (if char-looked-at
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment