diff tests/automated/regexp-tests.el @ 4517:5e8f6469169f

Fix up initial condition for skip-chars test.
author Stephen J. Turnbull <stephen@xemacs.org>
date Sat, 27 Sep 2008 16:34:40 +0900
parents b82fdf7305ee
children e0a8c796f955
line wrap: on
line diff
--- a/tests/automated/regexp-tests.el	Sat Sep 27 16:31:32 2008 +0900
+++ b/tests/automated/regexp-tests.el	Sat Sep 27 16:34:40 2008 +0900
@@ -526,6 +526,7 @@
 
 (with-string-as-buffer-contents 
     "-]-----------------------------][]]------------------------"
+  (goto-char (point-min))
   (skip-chars-forward (skip-chars-quote "-[]"))
   (Assert (= (point) (point-max)))
   (skip-chars-backward (skip-chars-quote "-[]"))