2016-10-21 21:02:22 +00:00
|
|
|
(defun org-space-key (&optional arg)
|
|
|
|
|
"Insert two spaces after a period."
|
|
|
|
|
(interactive "p")
|
|
|
|
|
|
2016-10-22 13:09:51 +00:00
|
|
|
(when (looking-back "[.!?…]")
|
2016-10-21 21:02:22 +00:00
|
|
|
(call-interactively 'self-insert-command arg))
|
|
|
|
|
(call-interactively 'self-insert-command arg))
|
2016-11-28 04:23:11 +00:00
|
|
|
|
|
|
|
|
;; From http://pages.sachachua.com/.emacs.d/Sacha.html
|
|
|
|
|
(defun sachachua/fill-or-unfill-paragraph (&optional unfill region)
|
|
|
|
|
"Fill paragraph (or REGION).
|
|
|
|
|
With the prefix argument UNFILL, unfill it instead."
|
|
|
|
|
(interactive (progn
|
|
|
|
|
(barf-if-buffer-read-only)
|
|
|
|
|
(list (if current-prefix-arg 'unfill) t)))
|
|
|
|
|
(let ((fill-column (if unfill (point-max) fill-column)))
|
|
|
|
|
(fill-paragraph nil region)))
|
