dbo/.emacs.d
dbo
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

[Init] Move ‘pp’ to section of builtin packages

This commit is contained in:
Daniel - 2017-09-30 22:40:57 +02:00
parent 6439b71543
commit 4ac8be452b
Signed by: dbo
GPG Key ID: 4F63DB96D45AA9C6
1 changed files with 12 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
init.el
View File

@ -487,6 +487,18 @@ _h_ _l_ _o_k _y_ank
(test eq window-system 'x))
(cdr (assoc "application" mailcap-mime-data))))))
(use-package pp
:commands (db/eval-last-sexp-or-region
pp-eval-expression)
:config (progn
(defun db/eval-last-sexp-or-region (prefix)
;; http://pages.sachachua.com/.emacs.d/Sacha.html#orgheadline140
"Eval region from BEG to END if active, otherwise the last sexp."
(interactive "P")
(if (and (mark) (use-region-p))
(eval-region (min (point) (mark)) (max (point) (mark)))
(pp-eval-last-sexp prefix)))))
(use-package quail
:defer t
:config (progn
@ -1257,18 +1269,6 @@ _h_ _l_ _o_k _y_ank
:commands (page-break-lines-mode)
:diminish page-break-lines-mode)
(use-package pp
:commands (db/eval-last-sexp-or-region
pp-eval-expression)
:config (progn
(defun db/eval-last-sexp-or-region (prefix)
;; http://pages.sachachua.com/.emacs.d/Sacha.html#orgheadline140
"Eval region from BEG to END if active, otherwise the last sexp."
(interactive "P")
(if (and (mark) (use-region-p))
(eval-region (min (point) (mark)) (max (point) (mark)))
(pp-eval-last-sexp prefix)))))
(use-package python
:defer t
:config (progn