diff options
-rw-r--r-- | .emacs | 14 | ||||
-rw-r--r-- | .vimrc | 19 |
2 files changed, 33 insertions, 0 deletions
@@ -26,6 +26,20 @@ ;; scrollbar on the right (set-scroll-bar-mode 'right) +;; maximize frame +(defun toggle-fullscreen (&optional other_mode) + "toggles whether the currently selected frame is maximized or reset to prior size" + (interactive) + (let ((f (selected-frame))) + (modify-frame-parameters f `((fullscreen . ,(if (frame-parameter f 'fullscreen) other_mode 'maximized)))))) + +(defun force-fullscreen () + "maximizes the currently selected frame" + (interactive) + (toggle-fullscreen 'maximized)) + +(add-hook 'emacs-startup-hook (lambda () (run-with-idle-timer 0.1 nil 'force-fullscreen))) + ;; theming (require 'color-theme) (color-theme-initialize) @@ -33,6 +33,22 @@ let &guicursor = &guicursor . ",a:blinkon0" set laststatus=2 " always show line set statusline=%-3.3n\ %f\ %r%w[%{strlen(&ft)?&ft:'none'},%{strlen(&fenc)?&fenc:&enc.'\ (G)'},%{&fileformat}]%m%=%-14.(%l,%c%V%)%<%P +" Maximize window +function ToggleFullscreen() + let cmd = ("silent !wmctrl -i -r " . v:windowid . " -b toggle,maximized_vert,maximized_horz") + if executable("wmctrl") + execute cmd + if v:shell_error + echoerr "Problem executing wmctrl" + echoerr "Cmd:" cmd + endif + else + echomsg "wmctrl not found" + endif +endfunction + +au GUIEnter * call ToggleFullscreen() + " ======================================================= " COMPLETION FOR CMDLINE " ======================================================= @@ -61,6 +77,9 @@ map <C-S-Tab> gT imap <S-Tab> <C-X><C-O> map <F10> :make<CR> +map <C-M-f> :call ToggleFullscreen()<CR> +imap <C-M-f> <ESC>:call ToggleFullscreen()<CR>a + " Makes more sense and is similar to D map Y y$ |