diff options
| -rw-r--r-- | .emacs | 7 | ||||
| -rw-r--r-- | .emacs-custom.el | 2 |
2 files changed, 9 insertions, 0 deletions
@@ -42,6 +42,7 @@ (global-set-key (kbd "C-c f") 'auto-fill-mode) (global-set-key (kbd "C-c k f") 'my/kill-ring-filename) (global-set-key (kbd "C-c k |") 'my/kill-ring-pipe-region) +(global-set-key (kbd "C-c k !") 'my/kill-ring-shell) (global-set-key (kbd "C-c m") 'man) (global-set-key (kbd "C-c p") 'electric-pair-mode) (global-set-key (kbd "C-c t") 'toggle-truncate-lines) @@ -218,6 +219,12 @@ t t nil shell-command-switch command) (kill-new (buffer-string))))) +(defun my/kill-ring-shell (command) + (interactive (list (read-shell-command "Shell command: "))) + (with-temp-buffer + (call-process-shell-command command nil t) + (kill-new (buffer-string)))) + (defun my/froggify () (ispell-change-dictionary "fr") (setq-local colon-double-space nil) diff --git a/.emacs-custom.el b/.emacs-custom.el index 8458d25..2a8c353 100644 --- a/.emacs-custom.el +++ b/.emacs-custom.el @@ -15,6 +15,7 @@ '(ediff-merge-split-window-function (quote split-window-vertically)) '(ediff-split-window-function (quote split-window-horizontally)) '(electric-pair-mode t) + '(enable-recursive-minibuffers t) '(erc-log-channels-directory "~/.irc-logs") '(erc-log-write-after-insert t) '(erc-log-write-after-send t) @@ -39,6 +40,7 @@ '(markdown-enable-math t) '(markdown-header-scaling t) '(menu-bar-mode nil) + '(minibuffer-depth-indicate-mode t) '(package-archives (quote (("melpa" . "https://melpa.org/packages/") |