diff options
| author | René Neumann <rene.neumann@in.tum.de> | 2012-09-07 18:43:13 +0200 |
|---|---|---|
| committer | René Neumann <rene.neumann@in.tum.de> | 2012-09-07 18:43:14 +0200 |
| commit | 4867ceff4ab4bdadcf2cba035ecd3631b8b74c5e (patch) | |
| tree | 38b6881600296defd54ee98d54d947da294684c0 | |
| parent | 630a3a8a84f0a0c1c38dd8ace3cbd1a734efa4d2 (diff) | |
| download | dotfiles-4867ceff4ab4bdadcf2cba035ecd3631b8b74c5e.tar.gz dotfiles-4867ceff4ab4bdadcf2cba035ecd3631b8b74c5e.tar.bz2 dotfiles-4867ceff4ab4bdadcf2cba035ecd3631b8b74c5e.zip | |
Fullscreen for both vim and emacs
| -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$ |