summaryrefslogtreecommitdiffstats
path: root/ymh-emacs/ymh-common.el
diff options
context:
space:
mode:
Diffstat (limited to 'ymh-emacs/ymh-common.el')
-rw-r--r--ymh-emacs/ymh-common.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/ymh-emacs/ymh-common.el b/ymh-emacs/ymh-common.el
index 660a4a4..3786016 100644
--- a/ymh-emacs/ymh-common.el
+++ b/ymh-emacs/ymh-common.el
@@ -49,6 +49,16 @@
(insert "%\n")
(self-insert-command 1)))
+
+;;; Stefan Monnier: It is the opposite of fill-paragraph.
+(defun ymh/unfill-paragraph (&optional region)
+ "Takes a multi-line paragraph and makes it into a single line of text."
+ (interactive (progn (barf-if-buffer-read-only) '(t)))
+ (let ((fill-column (point-max))
+ ;; This would override `fill-column' if it's an integer.
+ (emacs-lisp-docstring-fill-column t))
+ (fill-paragraph nil region)))
+
(provide 'ymh-common)
;;; ymh-common.el ends here