diff options
-rw-r--r-- | lisp/acdw.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/acdw.el b/lisp/acdw.el index f642c65..7e82a9a 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el | |||
@@ -312,7 +312,7 @@ With a prefix argument, run git pull on the repo first." | |||
312 | 312 | ||
313 | (defun acdw/copy-region-plain (start end) | 313 | (defun acdw/copy-region-plain (start end) |
314 | "Copy a region to clipboard, removing all Org formatting." | 314 | "Copy a region to clipboard, removing all Org formatting." |
315 | (interactive "*r") | 315 | (interactive "r") |
316 | (let ((s (buffer-substring-no-properties start end)) | 316 | (let ((s (buffer-substring-no-properties start end)) |
317 | (extracted-heading (when (derived-mode-p 'org-mode) | 317 | (extracted-heading (when (derived-mode-p 'org-mode) |
318 | (acdw/org-extract-heading-text)))) | 318 | (acdw/org-extract-heading-text)))) |