diff options
Diffstat (limited to 'test')
| -rw-r--r-- | test/automated/character-fold-tests.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/automated/character-fold-tests.el b/test/automated/character-fold-tests.el index 4e8761e6f7b..c0568625649 100644 --- a/test/automated/character-fold-tests.el +++ b/test/automated/character-fold-tests.el | |||
| @@ -113,7 +113,7 @@ | |||
| 113 | ;; Our initial implementation of case-folding in char-folding | 113 | ;; Our initial implementation of case-folding in char-folding |
| 114 | ;; created a lot of redundant paths in the regexp. Because of | 114 | ;; created a lot of redundant paths in the regexp. Because of |
| 115 | ;; that, if a really long string "almost" matches, the regexp | 115 | ;; that, if a really long string "almost" matches, the regexp |
| 116 | ;; engine took a long time to realise that it doesn't match. | 116 | ;; engine took a long time to realize that it doesn't match. |
| 117 | (should-not (character-fold-search-forward (concat string "c") nil 'noerror)) | 117 | (should-not (character-fold-search-forward (concat string "c") nil 'noerror)) |
| 118 | ;; Ensure it took less than a second. | 118 | ;; Ensure it took less than a second. |
| 119 | (should (< (- (time-to-seconds (current-time)) | 119 | (should (< (- (time-to-seconds (current-time)) |