diff options
| author | Case Duckworth | 2021-08-20 17:27:54 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-08-20 17:27:54 -0500 |
| commit | 7da76d7fd126a105037692f3c967852bb373a3f3 (patch) | |
| tree | ead2bb00092d2d097f1e468066dd3dc155f0811e /lisp/acdw-org.el | |
| parent | Change page-handling logic (diff) | |
| download | emacs-7da76d7fd126a105037692f3c967852bb373a3f3.tar.gz emacs-7da76d7fd126a105037692f3c967852bb373a3f3.zip | |
Better handle prefix links in acdw/org-return-dwim
Diffstat (limited to 'lisp/acdw-org.el')
| -rw-r--r-- | lisp/acdw-org.el | 7 |
1 files changed, 6 insertions, 1 deletions
| diff --git a/lisp/acdw-org.el b/lisp/acdw-org.el index 123c701..de2bafc 100644 --- a/lisp/acdw-org.el +++ b/lisp/acdw-org.el | |||
| @@ -44,7 +44,12 @@ appropriate. In tables, insert a new row or end the table." | |||
| 44 | (funcall func)) | 44 | (funcall func)) |
| 45 | (funcall auto-fill-function))) | 45 | (funcall auto-fill-function))) |
| 46 | (if default | 46 | (if default |
| 47 | (org-return) | 47 | ;; Handle prefix args |
| 48 | (pcase default | ||
| 49 | ('(4) (newline)) | ||
| 50 | ('(16) (newline 2)) | ||
| 51 | ;; this is ... not ideal. but whatever. | ||
| 52 | (_ (newline default))) | ||
| 48 | (cond | 53 | (cond |
| 49 | ;; Act depending on context around point. | 54 | ;; Act depending on context around point. |
| 50 | 55 | ||