ryuslash/emacs-config
1
0
Fork 0
Code Activity

[oni-core] Add a function that does the reverse of ‘fill-paragraph’

Browse source 
This was taken from Bastien Guerry’s Emacs configuration:
https://github.com/bzg/dotemacs
This commit is contained in:
Tom Willemse 2021-04-25 17:57:46 -07:00
parent 1e974046c5
commit fda64e525e
1 changed files with 10 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
oni-core.el
View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org> ;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local ;; 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) ;; 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 ;; This program is free software; you can redistribute it and/or modify
@ -81,6 +81,14 @@
(end-of-line))) (end-of-line)))
(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 () (defun oni-core-recentf-save-list-silently ()
"Call ‘recentf-save-list’ but without showing a message about it." "Call ‘recentf-save-list’ but without showing a message about it."
(let ((inhibit-message t)) (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-n") 'windmove-down)
(global-set-key (kbd "C-S-p") 'windmove-up) (global-set-key (kbd "C-S-p") 'windmove-up)
(global-set-key (kbd "C-c (") 'embrace-commander) (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-c s") #'oni-sort-and-align-hydra/body)
(global-set-key (kbd "C-x C-b") 'ibuffer-jump) (global-set-key (kbd "C-x C-b") 'ibuffer-jump)
(global-set-key (kbd "C-x M-f") 'ffap) (global-set-key (kbd "C-x M-f") 'ffap)