diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2026-04-25 10:41:16 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2026-04-25 10:41:16 -0400 |
| commit | 28f828e8a65d27d6d51e0ca778b0f3a201bc4fa7 (patch) | |
| tree | c2b23d32fe5721aff22645901bf09166402814a9 /test/lisp | |
| parent | 5a9cfbd7fd9f9df968201509fb432bd5369dd9b8 (diff) | |
register.el: Allow jumping to kmacros again (bug#80894)
* lisp/register.el (register--get-method-type): Fix handling for
OClosure args.
* test/lisp/register-tests.el (register--jumpable-p): New test.
Diffstat (limited to 'test/lisp')
| -rw-r--r-- | test/lisp/register-tests.el | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/test/lisp/register-tests.el b/test/lisp/register-tests.el index d97b4a0bee9..5b7fef6c9a6 100644 --- a/test/lisp/register-tests.el +++ b/test/lisp/register-tests.el @@ -39,5 +39,10 @@ (quit (car err))))) (should-not register-alist)))) +(ert-deftest register--jumpable-p () + (should (register--jumpable-p (kmacro "test"))) + (should (register--jumpable-p (make-marker))) + (should-not (register--jumpable-p "test"))) + (provide 'register-tests) ;;; register-tests.el ends here |