emacs.d

My Emacs configuration
git clone https://git.jamzattack.xyz/emacs.d
Log | Files | Refs | LICENSE

minibuffer-hacks.el (1501B)


      1 ;;; minibuffer-hacks.el --- Minor minibuffer improvements -*- lexical-binding: t; -*-
      2 
      3 ;; Copyright (C) 2020  Jamie Beardslee
      4 
      5 ;; Author: Jamie Beardslee <jdb@jamzattack.xyz>
      6 ;; Keywords:
      7 
      8 ;; This program is free software; you can redistribute it and/or modify
      9 ;; it under the terms of the GNU General Public License as published by
     10 ;; the Free Software Foundation, either version 3 of the License, or
     11 ;; (at your option) any later version.
     12 
     13 ;; This program is distributed in the hope that it will be useful,
     14 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
     15 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     16 ;; GNU General Public License for more details.
     17 
     18 ;; You should have received a copy of the GNU General Public License
     19 ;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
     20 
     21 ;;; Commentary:
     22 
     23 ;; This is a very minimal package.  It just defines two functions at
     24 ;; the moment:
     25 
     26 ;; `increase-minibuffer-size-please': to increase the minibuffer font
     27 ;; size
     28 ;; `exit-minibuffer-other-window': to exit the minibuffer in another
     29 ;; window.
     30 
     31 ;;; Code:
     32 
     33 (defun increase-minibuffer-size-please ()
     34   "Increase the font size by 1 step."
     35   (text-scale-increase 1))
     36 
     37 (defun exit-minibuffer-other-window ()
     38   "Exit the minibuffer in another window."
     39   (interactive)
     40   (unless (fboundp 'other-window-prefix)
     41     (error "Emacs 28.0.50 is required"))
     42   (other-window-prefix)
     43   (exit-minibuffer))
     44 
     45 (provide 'minibuffer-hacks)
     46 ;;; minibuffer-hacks.el ends here