diff options
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/fns-tests.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/test/src/fns-tests.el b/test/src/fns-tests.el index e0aed2a71b6..3a43142106b 100644 --- a/test/src/fns-tests.el +++ b/test/src/fns-tests.el | |||
| @@ -1098,3 +1098,11 @@ | |||
| 1098 | (goto-char (point-max)) | 1098 | (goto-char (point-max)) |
| 1099 | (insert "fóo") | 1099 | (insert "fóo") |
| 1100 | (should (approx-equal (buffer-line-statistics) '(1002 50 49.9))))) | 1100 | (should (approx-equal (buffer-line-statistics) '(1002 50 49.9))))) |
| 1101 | |||
| 1102 | (ert-deftest test-line-number-at-position () | ||
| 1103 | (with-temp-buffer | ||
| 1104 | (insert (make-string 10 ?\n)) | ||
| 1105 | (should (= (line-number-at-position (point)) 11)) | ||
| 1106 | (should-error (line-number-at-position nil)) | ||
| 1107 | (should-error (line-number-at-position -1)) | ||
| 1108 | (should-error (line-number-at-position 100)))) | ||