 
 (with-eval-after-load 'frameset
   (defun remove-unrestorable-file-buffers (window-tree)
+  (defun frameset--remove-unrestorable-file-buffers (window-tree)
     "Remove un-restorable buffers from window state."
     (let ((head (car window-tree))
           (tail (cdr window-tree)))
       (cond ((memq head '(vc hc))
-             `(,head ,@(remove-unrestorable-file-buffers tail)))
+             `(,head ,@(frameset--remove-unrestorable-file-buffers tail)))
             ((eq head 'leaf)
              (let* ((buffer (alist-get 'buffer tail))
                     (buffer-name (car buffer))


;; Emacs Lisp
(pcase-dolist (`(,key . ,command)
               `(("C-c e f" . byte-compile-file)
                 ("C-c e c" . emacs-lisp-byte-compile)
                 ("C-c e l" . emacs-lisp-byte-compile-and-load)
                 ("C-c e b" . eval-buffer)


;; Bind useful things to keys
(pcase-dolist (`(,key . ,command)
               '(("<backtab>" . align)
                 ("C-x f"     . follow-mode)
                 ;; Replace default buffer menu with ibuffer
                 ("C-x C-b"   . ibuffer)
