diff options
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/acdw.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/acdw.el b/lisp/acdw.el index 8cbe16d..2be0c4e 100644 --- a/lisp/acdw.el +++ b/lisp/acdw.el | |||
@@ -318,9 +318,11 @@ With a prefix argument, run git pull on the repo first." | |||
318 | (insert s) | 318 | (insert s) |
319 | (let ((sentence-end-double-space nil)) | 319 | (let ((sentence-end-double-space nil)) |
320 | (unfill-region (point-min) (point-max))) | 320 | (unfill-region (point-min) (point-max))) |
321 | (copy-region-as-kill (point-min) (point-max)) | 321 | (copy-region-as-kill (point-min) (point-max))) |
322 | (when (called-interactively-p 'interactive) | 322 | (when (called-interactively-p 'interactive) |
323 | (indicate-copied-region))))) | 323 | (indicate-copied-region)) |
324 | (setq deactivate-mark t) | ||
325 | nil)) | ||
324 | 326 | ||
325 | (defun acdw/dir (&optional file make-directory) | 327 | (defun acdw/dir (&optional file make-directory) |
326 | "Place Emacs files in one place. | 328 | "Place Emacs files in one place. |