opfez
/
.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

tabs, fez/tex-word-count

This commit is contained in:
opfez 2021-12-06 18:58:56 +01:00
parent 03c14a9a96
commit a521736b14
2 changed files with 44 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
custom.el
View File

@ -224,6 +224,15 @@
guard
" */\n")))
(forward-line -3))
(defun fez/tex-word-count ()
(interactive)
(message
(substring
(shell-command-to-string
(concat "detex " (buffer-file-name) " | wc -w"))
0 -1)))
;; Eshell convinience commands.
(defalias 'open 'find-file-other-window)
(defalias 'clean 'eshell/clear-scrollback)

35
packages.el
View File

@ -156,6 +156,41 @@
(add-hook 'lisp-mode-hook 'highlight-parentheses-mode)
(add-hook 'emacs-lisp-mode-hook 'highlight-parentheses-mode))
;; Show buffers as tabs
(use-package tabbar
:ensure t
:config
(setq tabbar-buffer-groups-function
(lambda ()
(list "All"))
tabbar-buffer-list-function
(lambda ()
(cl-remove-if
(lambda (buffer)
(and (not (equal (buffer-name buffer)
(buffer-name (current-buffer))))
(or (equal (aref (buffer-name buffer) 0) ?*)
(equal (aref (buffer-name buffer) 1) ?*))))
(buffer-list)))
tabbar-scroll-left-help-function nil
tabbar-scroll-right-help-function nil
tabbar-help-on-tab-function nil
tabbar-home-help-function nil
tabbar-buffer-home-button (quote (("") ""))
tabbar-scroll-left-button (quote (("") ""))
tabbar-scroll-right-button (quote (("") "")))
(setq tabbar-background-color "#111111") ;; the color of the tabbar background
(custom-set-variables
'(tabbar-separator '(1.0)))
(custom-set-faces
'(tabbar-default ((t (:inherit variable-pitch :background "#111111" :foreground "#eeeeee"))))
'(tabbar-button ((t (:inherit tabbar-default :foreground "dark red"))))
'(tabbar-button-highlight ((t (:inherit tabbar-default))))
'(tabbar-highlight ((t (:underline t))))
'(tabbar-selected ((t (:inherit tabbar-default :background "#000000"))))
'(tabbar-separator ((t (:inherit tabbar-default :background "#111111"))))
'(tabbar-unselected ((t (:inherit tabbar-default))))))
;; org-mode
(use-package org
:ensure t