Allow acdw/copy-region-as-plain in read-only buffers
This commit is contained in:
parent
ca44456488
commit
e423eeca3e
|
@ -312,7 +312,7 @@ With a prefix argument, run git pull on the repo first."
|
||||||
|
|
||||||
(defun acdw/copy-region-plain (start end)
|
(defun acdw/copy-region-plain (start end)
|
||||||
"Copy a region to clipboard, removing all Org formatting."
|
"Copy a region to clipboard, removing all Org formatting."
|
||||||
(interactive "*r")
|
(interactive "r")
|
||||||
(let ((s (buffer-substring-no-properties start end))
|
(let ((s (buffer-substring-no-properties start end))
|
||||||
(extracted-heading (when (derived-mode-p 'org-mode)
|
(extracted-heading (when (derived-mode-p 'org-mode)
|
||||||
(acdw/org-extract-heading-text))))
|
(acdw/org-extract-heading-text))))
|
||||||
|
|
Loading…
Reference in New Issue