diff --git a/.emacs.d/main.el b/.emacs.d/main.el index 1a69f376..e8f9eca9 100644 --- a/.emacs.d/main.el +++ b/.emacs.d/main.el @@ -82,9 +82,12 @@ ;; Make questions less annoying. (defalias 'yes-or-no-p 'y-or-n-p) -;; Print column number. +;; Print column number in mode line. (column-number-mode 1) +;; Print buffer size in mode line. +(size-indication-mode 1) + ;; Kill whole line including \n. (setq kill-whole-line t) @@ -503,6 +506,8 @@ has errors and/or warnings." (lambda () (local-set-key (kbd "C-c a") 'dired-toggle-hidden) (local-set-key (kbd "C-c h") 'dired-toggle-humansize) + ;; (local-set-key (kbd "") 'dired-up-directory) + ;; (local-set-key (kbd "") 'dired-find-file) (local-set-key (kbd "b") 'dired-up-directory))) ;; Eshell diff --git a/.emacs.d/theme.el b/.emacs.d/theme.el index d5c9671b..09514d5d 100644 --- a/.emacs.d/theme.el +++ b/.emacs.d/theme.el @@ -10,8 +10,10 @@ (set-face-background 'default "black" ) ;; Font size (if (fboundp 'tool-bar-mode) - (set-face-attribute 'default nil :height 100) - (add-to-list 'default-frame-alist '(font . "DejaVu Sans Mono-13"))) + ;; (set-face-attribute 'default nil :height 100) + (add-to-list 'default-frame-alist '(font . "DejaVu Sans Mono-10"))) +(set-face-background 'modeline "white") +;; (set-face-foreground 'modeline "#000000") (set-face-foreground 'link "#00ffff" ) (set-face-underline-p 'link t)