diff options
| -rwxr-xr-x | emacs.org | 29 |
1 files changed, 29 insertions, 0 deletions
@@ -1305,7 +1305,36 @@ Set aliases for emacs functions and ~PATH~ (switch-to-buffer (get-buffer-create "*scratch*")) (emacs-lisp-mode)) + (defun thanos/frame () + (let ((frame (make-frame '((minibuffer . only))))) + (set-frame-height frame 300) + (set-frame-width frame 800) + (counsel-linux-app) + frame)) + (define-key Create (kbd "e") 'create-scratch) + ;; #+end_src + + + +** App launcher +#+begin_src emacs-lisp + (when (equal (load-file "~/Developer/emacs-app-launcher/app-launcher.el") t) + (defun thanos/app-launcher () + (interactive) + (let ((ivy-height 100)) + (with-selected-frame + (make-frame '((name . "thanos/emacs-launcher") + (minibuffer . only) + (fullscreen . 0) + (undecorated . t) + (internal-border-width . 10) + (width . 80) + (height . 11))) + (unwind-protect + (app-launcher-run-app) + (delete-frame)))))) +#+end_src |