From fda64e525ea6108ccac3e2f20ab7dad11a1eae21 Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Sun, 25 Apr 2021 17:57:46 -0700 Subject: [PATCH] =?UTF-8?q?[oni-core]=20Add=20a=20function=20that=20does?= =?UTF-8?q?=20the=20reverse=20of=20=E2=80=98fill-paragraph=E2=80=99?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This was taken from Bastien Guerry’s Emacs configuration: https://github.com/bzg/dotemacs --- oni-core.el | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/oni-core.el b/oni-core.el index ce65991..0ce6bc8 100644 --- a/oni-core.el +++ b/oni-core.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse ;; Keywords: local -;; Version: 2021.0425.175316 +;; Version: 2021.0425.175742 ;; Package-Requires: (oni-data-dir oni-embrace oni-hydra expand-region multiple-cursors gcmh diminish ws-butler which-key insert-char-preview) ;; This program is free software; you can redistribute it and/or modify @@ -81,6 +81,14 @@ (end-of-line))) (end-of-line)))) +;;; From Bastien Guerry’s Emacs configuraiton: +;;; https://github.com/bzg/dotemacs/blob/master/emacs.org +(defun oni-core-unfill-paragraph () + "Make a multi-line paragraph into a single line of text." + (interactive) + (let ((fill-column (point-max))) + (fill-paragraph nil))) + (defun oni-core-recentf-save-list-silently () "Call ‘recentf-save-list’ but without showing a message about it." (let ((inhibit-message t)) @@ -172,6 +180,7 @@ _s_: String list" (global-set-key (kbd "C-S-n") 'windmove-down) (global-set-key (kbd "C-S-p") 'windmove-up) (global-set-key (kbd "C-c (") 'embrace-commander) +(global-set-key (kbd "C-c q") #'oni-core-unfill-paragraph) (global-set-key (kbd "C-c s") #'oni-sort-and-align-hydra/body) (global-set-key (kbd "C-x C-b") 'ibuffer-jump) (global-set-key (kbd "C-x M-f") 'ffap)