Re: [PATCH v2] lisp/org.el: Add final hooks to S-/M-/S-M-cursor commands

2023-07-04 Thread Ihor Radchenko
Evgenii Klimov writes: > Maybe I got it wrong, but I tried to follow the docstring for > `org-metaleft'. And I don't see here the use of the return value either: > > #+begin_example > (defun org-metaleft (&optional _arg) > "... > This function runs the hook `org-metaleft-hook' as a firs

Re: [PATCH v2] lisp/org.el: Add final hooks to S-/M-/S-M-cursor commands

2023-07-03 Thread Evgenii Klimov
Ihor Radchenko writes: [...] >> +individual commands for more information. >> + >> +This function runs the hook `org-shiftmetaleft-hook' as a first >> +step, `org-shiftmetaleft-final-hook' as the penultimate step, and >> +returns at first non-nil value." > > Upon looking closer, I realized that

Re: [PATCH v2] lisp/org.el: Add final hooks to S-/M-/S-M-cursor commands

2023-07-03 Thread Ihor Radchenko
Evgenii Klimov writes: > ... Thanks for the update. Few comments. First, please add Changelog entry for etc/ORG-NEWS. > +(defvar org-metaleft-final-hook nil > + "Hook for functions attaching themselves to `M-left'. > +See `org-ctrl-c-ctrl-c-hook' for more information.") Note that unlike the

[PATCH v2] lisp/org.el: Add final hooks to S-/M-/S-M-cursor commands

2023-07-03 Thread Evgenii Klimov
* lisp/org.el (org-metaleft-final-hook, org-metaright-final-hook, org-metaup-final-hook, org-metadown-final-hook): Define final hooks for S-cursor commands. (org-metaleft, org-metaright, org-metaup, org-metadown): Add final hooks to M-commands and document them in the docstring. * lisp/org.el (org