marcuskammer/emacs.d
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Comment out unused code

Browse source
This commit is contained in:
Marcus Kammer 2023-11-09 07:48:42 +01:00
parent bb0d0b1f37
commit 54c487c629
Signed by: marcuskammer
GPG key ID: C374817BE285268F
1 changed files with 17 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

35
bundle/bundle--gui.el
View file

@ -29,17 +29,17 @@
(add-hook 'after-make-frame-functions 'center-frame)
(defun my-vc-info ()
(when vc-mode
(concat (substring vc-mode 5)
" ["
(substring (vc-working-revision (buffer-file-name)) 0 8)
"] ")))
;; (defun my-vc-info ()
;; (when vc-mode
;; (concat (substring vc-mode 5)
;; " ["
;; (substring (vc-working-revision (buffer-file-name)) 0 8)
;; "] ")))
(defun my-project-name ()
(let ((proj (project-current)))
(if proj (file-name-base (directory-file-name (project-root proj)))
"NoProject")))
;; (defun my-project-name ()
;; (let ((proj (project-current)))
;; (if proj (file-name-base (directory-file-name (project-root proj)))
;; "NoProject")))
;; (setq-default header-line-format
;; (list "-%M"
@ -55,8 +55,8 @@
;; 'default-directory
;; "-%-"))
(set-face-attribute 'mode-line nil :weight 'bold)
(set-face-attribute 'header-line nil :weight 'bold)
;; (set-face-attribute 'mode-line nil :weight 'bold)
;; (set-face-attribute 'header-line nil :weight 'bold)
(use-package all-the-icons
:if (display-graphic-p)
@ -123,12 +123,11 @@
:custom
(tab-bar-format
'(tab-bar-format-history
tab-bar-format-tabs-groups)))
(setq tab-line-close-button-show nil)
(setq tab-line-new-button-show nil)
(setq tab-line-tabs-function 'tab-line-tabs-mode-buffers)
;(global-tab-line-mode 1)
tab-bar-format-tabs-groups))
:config
(setq tab-line-close-button-show nil)
(setq tab-line-new-button-show nil)
(setq tab-line-tabs-function 'tab-line-tabs-mode-buffers))
(use-package doc-view
:ensure nil