# HG changeset patch
# User Stephen J. Turnbull <stephen@xemacs.org>
# Date 1222500880 -32400
# Node ID 5e8f6469169f510de040ea59a106e1de5c29c73f
# Parent  e96f3aca4d63ae750580ce3d8b84201321340723
Fix up initial condition for skip-chars test.

diff -r e96f3aca4d63 -r 5e8f6469169f tests/ChangeLog
--- a/tests/ChangeLog	Sat Sep 27 16:31:32 2008 +0900
+++ b/tests/ChangeLog	Sat Sep 27 16:34:40 2008 +0900
@@ -1,3 +1,8 @@
+2008-09-27  Stephen J. Turnbull  <stephen@xemacs.org>
+
+	* automated/regexp-tests.el: `with-string-as-buffer-contents'
+	leaves point at end of buffer, so must move point to beginning.
+
 2008-08-27  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* automated/regexp-tests.el: 
diff -r e96f3aca4d63 -r 5e8f6469169f tests/automated/regexp-tests.el
--- 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 "-[]"))