diff --git a/.emacs.d/lisp/functions.el b/.emacs.d/lisp/functions.el index 832c2d63..9e30cada 100644 --- a/.emacs.d/lisp/functions.el +++ b/.emacs.d/lisp/functions.el @@ -190,6 +190,7 @@ If DIR-LEFT is t, then move left, otherwise move right." (defun ambrevar/reset-fill-column () "Reset `fill-column' to its default value." + (interactive) (setq fill-column (default-value 'fill-column))) (defun ambrevar/sort-lines-unique (arg) @@ -369,19 +370,6 @@ This does not interfere with `subword-mode'." (modify-syntax-entry ?_ "_") (message "_ is a word delimiter"))) -(defun ambrevar/unfill-paragraph () - "Paragraph at point is unwrapped on one single line." - (interactive) - (let ((fill-column (point-max))) - (fill-paragraph nil))) - -(defun ambrevar/unfill-region () - "Unfill all paragraphs found in current region. -Each paragraph stand on its line." - (interactive) - (let ((fill-column (point-max))) - (fill-region (region-beginning) (region-end) nil))) - (defun ambrevar/youtube-dl-url (&optional url) "Run 'youtube-dl' over the URL. If URL is nil, use URL at point."