From: Glenn Morris Date: Sat, 2 Aug 2014 20:22:31 +0000 (-0400) Subject: * test/automated/fns-tests.el (fns-tests-compare-strings): Update test. X-Git-Tag: emacs-25.0.90~2635^2~679^2~539 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3865ce6754d3e2af77ee4df8269b325cef312b3b;p=emacs.git * test/automated/fns-tests.el (fns-tests-compare-strings): Update test. --- diff --git a/test/ChangeLog b/test/ChangeLog index 144f1078319..f9b410bf600 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -1,5 +1,8 @@ 2014-08-02 Glenn Morris + * automated/fns-tests.el (fns-tests-compare-strings): + Update test. (Bug#17903) + * automated/icalendar-tests.el (icalendar--decode-isodatetime): Use more precise TZ specification, as per 2013-08-04. diff --git a/test/automated/fns-tests.el b/test/automated/fns-tests.el index 461995b602e..d3d921f425f 100644 --- a/test/automated/fns-tests.el +++ b/test/automated/fns-tests.el @@ -73,7 +73,7 @@ (ert-deftest fns-tests-compare-strings () (should-error (compare-strings)) (should-error (compare-strings "xyzzy" "xyzzy")) - (should-error (compare-strings "xyzzy" 0 10 "zyxxy" 0 5)) + (should (= (compare-strings "xyzzy" 0 10 "zyxxy" 0 5) -1)) (should-error (compare-strings "xyzzy" 0 5 "zyxxy" -1 2)) (should-error (compare-strings "xyzzy" 'foo nil "zyxxy" 0 1)) (should-error (compare-strings "xyzzy" 0 'foo "zyxxy" 2 3))