diff options
Diffstat (limited to 'test/lisp/mouse-tests.el')
| -rw-r--r-- | test/lisp/mouse-tests.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/test/lisp/mouse-tests.el b/test/lisp/mouse-tests.el index f8c91004ecc..170df4a9b98 100644 --- a/test/lisp/mouse-tests.el +++ b/test/lisp/mouse-tests.el @@ -26,8 +26,7 @@ ;;; Code: (ert-deftest bug23288-use-return-value () - "If ‘mouse-on-link-p’ returns a string, its first character is -used." + "If `mouse-on-link-p' returns a string, its first character is used." (cl-letf ((last-input-event '(down-mouse-1 nil 1)) (unread-command-events '((mouse-1 nil 1))) (mouse-1-click-follows-link t) @@ -37,8 +36,8 @@ used." (should (equal unread-command-events '(?a))))) (ert-deftest bug23288-translate-to-mouse-2 () - "If ‘mouse-on-link-p’ doesn’t return a string or vector, -translate ‘mouse-1’ events into ‘mouse-2’ events." + "If `mouse-on-link-p' doesn't return a string or vector, +translate `mouse-1' events into `mouse-2' events." (cl-letf ((last-input-event '(down-mouse-1 nil 1)) (unread-command-events '((mouse-1 nil 1))) (mouse-1-click-follows-link t) |