💥 Change set-popup-rule! usage

Now accepts a flat plist of all its former parameters, including new
:parameters and :actions properties to increase your control over the
fate of your windows.

The old usage of set-popup-rule! is deprecated and may not work right!

The :ui popup module has also seen a major refactor to improve
efficiency and load times.

Sorry! This is the last "big" change before 2.1!
This commit is contained in:
Henrik Lissner 2018-06-18 02:26:05 +02:00
parent 4e5c8b6052
commit 6808c46b58
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
26 changed files with 356 additions and 351 deletions

View file

@ -73,17 +73,17 @@ string). Stops at the first function to return non-nil.")
:config
(set-popup-rules!
'(("^\\*Org Src"
((size . 100) (side . right) (slot . -1) (window-height . 0.6))
((quit) (select . t) (modeline)))
:side 'right :size 100 :height 0.6 :slot -1
:quit nil :select t)
("^\\*Python"
((slot . 0) (side . right) (size . 100))
((select) (quit) (transient)))
:slot 0 :side 'right :size 100
:select nil :quit nil :ttl nil)
("\\*ob-ipython.*"
((slot . 2) (side . right) (size . 100) (window-height . 0.2))
((select) (quit) (transient)))
:slot 2 :side 'right :size 100 :height 0.2
:select nil :quit nil :transient nil)
("\\*Python:.*"
((slot . 0) (side . right) (size . 100))
((select) (quit) (transient)))))
:slot 0 :side 'right :size 100
:select nil :quit nil :transient nil)))
;; TODO Add more popup styles
;; advices for remote kernel and org-src-edit

View file

@ -140,17 +140,10 @@ unfold to point on startup."
"Defines popup rules for org-mode (does nothing if :ui popup is disabled)."
(set-popup-rules!
'(("^\\*\\(?:Agenda Com\\|Calendar\\|Org \\(?:Links\\|Export Dispatcher\\|Select\\)\\)"
((slot . -1) (vslot . -1) (size . +popup-shrink-to-fit))
((transient . 0)))
("^\\*Org Agenda"
((size . 0.35))
((select . t) (transient)))
("^\\*Org Src"
((size . 0.3))
((quit) (select . t)))
("^CAPTURE.*\\.org$"
((size . 0.2))
((quit) (select . t))))))
:slot -1 :vslot -1 :size #'+popup-shrink-to-fit :ttl 0)
("^\\*Org Agenda" :size 0.35 :select t :ttl nil)
("^\\*Org Src" :size 0.3 :quit nil :select t)
("^CAPTURE.*\\.org$" :size 0.2 :quit nil :select t))))
(defun +org|setup-pretty-code ()
"Setup the default pretty symbols for"