wgester/dotfiles
1
0
Fork 0
forked from colonelpanic/dotfiles
Code Pull Requests Activity

whitespace stuff.

Browse Source
This commit is contained in:
Ivan Malison 2014-11-21 06:28:04 -08:00
parent 5d386c4b76
commit beb7e30fad
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
init.el
View File

@ -144,9 +144,9 @@ buffer is not visiting a file."
(message (get-buffer-name))) (message (get-buffer-name)))
(defun frame-exists () (defun frame-exists ()
(cl-find-if (lambda (frame) (cl-find-if
(assoc 'display (frame-parameters frame))) (lambda (frame)
(frame-list))) (assoc 'display (frame-parameters frame))) (frame-list)))
(defun make-frame-if-none-exists () (defun make-frame-if-none-exists ()
(let* ((existing-frame (frame-exists))) (let* ((existing-frame (frame-exists)))