Remove posframe package and other related.

It is more fancy but sometimes is buggy for me and I like mor the normal way of
emacs that shows all at the bottom.
This commit is contained in:
kj
2025-08-13 02:12:08 -03:00
parent 9727ed4949
commit 5ffc4df914
4 changed files with 1 additions and 85 deletions

View File

@ -126,30 +126,5 @@
(async-bytecomp-package-mode 1)
(dired-async-mode 1))
;; Child frame
(use-package posframe
:hook (after-load-theme . posframe-delete-all)
:init
(defface posframe-border
`((t (:inherit region)))
"Face used by the `posframe' border."
:group 'posframe)
(defvar posframe-border-width 2
"Default posframe border width.")
:config
(with-no-warnings
(defun my-posframe--prettify-frame (&rest _)
(set-face-background 'fringe nil posframe--frame))
(advice-add #'posframe--create-posframe :after #'my-posframe--prettify-frame)
(defun posframe-poshandler-frame-center-near-bottom (info)
(cons (/ (- (plist-get info :parent-frame-width)
(plist-get info :posframe-width))
2)
(/ (+ (plist-get info :parent-frame-height)
(* 2 (plist-get info :font-height)))
2)))))
(provide 'init-base)
;;; init-base.el ends here