commit: Fix up initial condition for skip-chars test.

changeset: 4517:5e8f6469169f510de040ea59a106e1de5c29c73f user: Stephen J. Turnbull <stephen(a)xemacs.org&gt; date: Sat Sep 27 16:34:40 2008 +0900 files: tests/ChangeLog tests/automated/regexp-tests.el description: Fix up initial condition for skip-chars test. diff -r e96f3aca4d63ae750580ce3d8b84201321340723 -r 5e8f6469169f510de040ea59a106e1de5c29c73f 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-08-27 Aidan Kehoe <kehoea＠parhasa +2008-09-27 Stephen J. Turnbull <stephen(a)xemacs.org&gt; + + * 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(a)parhasard.net&gt; * automated/regexp-tests.el: diff -r e96f3aca4d63ae750580ce3d8b84201321340723 -r 5e8f6469169f510de040ea59a106e1de5c29c73f 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 ＠＠ baaaa (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 "-[]")) _______________________________________________ XEmacs-Patches mailing list XEmacs-Patches(a)xemacs.org http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches