On daemon mode, kill all buffer except dashboard on close frame.
This commit is contained in:
		| @@ -11,7 +11,8 @@ | ||||
| ;;; Code: | ||||
|  | ||||
| ;; The default is 800 kilobytes.  Measured in bytes. | ||||
| (setq gc-cons-threshold (* 50 1000 1000)) | ||||
| (setq gc-cons-threshold (* 50 1024 1024)) | ||||
| (setq read-process-output-max (* 1024 1024)) | ||||
|  | ||||
| ;; Native compilation | ||||
| (when (and (fboundp 'native-comp-available-p) | ||||
| @@ -115,11 +116,9 @@ | ||||
|   ;; Cerrar buffers al cerrar emacsclient | ||||
|   (add-hook 'delete-frame-functions | ||||
|             (lambda (frame) | ||||
|               (let* ((window (frame-selected-window frame)) | ||||
|                      (buffer (and window (window-buffer window)))) | ||||
|                 (when (and buffer (buffer-file-name buffer)) | ||||
|                   (kill-buffer buffer))))) | ||||
|  ) | ||||
|               (mapc 'kill-buffer (delq (get-buffer "*dashboard*") (buffer-list))) | ||||
|               )) | ||||
|   ) | ||||
|  | ||||
| (if (daemonp) | ||||
|     (add-hook 'after-make-frame-functions | ||||
|   | ||||
		Reference in New Issue
	
	Block a user