awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

region-aware narf/org-surround

Browse Source
This commit is contained in:
Henrik Lissner
2015-12-04 03:34:43 -05:00
parent 17403015fb
commit fa9f197c4e
1 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
modules/lib/defuns-org.el
View File

@ -111,7 +111,14 @@
;; Formatting shortcuts ;; Formatting shortcuts
;;;###autoload ;;;###autoload
(defun narf/org-surround (delim) (defun narf/org-surround (delim)
(insert delim) (save-excursion (insert delim))) (if (region-active-p)
(save-excursion
(goto-char (region-beginning))
(insert delim)
(goto-char (region-end))
(insert delim))
(insert delim)
(save-excursion (insert delim))))
;;;###autoload ;;;###autoload
(defun narf/org-word-count (beg end &optional count-footnotes?) (defun narf/org-word-count (beg end &optional count-footnotes?)