10sr 12 лет назад
Родитель
Сommit
083a769cb6
2 измененных файлов: 8 добавлений и 4 удалений
  1. +5
    -0
      conkyrc
  2. +3
    -4
      emacs.el

+ 5
- 0
conkyrc Просмотреть файл

@@ -40,6 +40,8 @@ no_buffers yes
uppercase no
format_human_readable yes

if_up_strictness link

TEXT
${color0}${alignr}${sysname} ${kernel} (${machine})
${color0}${alignr}${execi 30000 whoami}@${nodename}
@@ -64,6 +66,9 @@ ${if_up wlan0}\
${color2}if ${color1}|${color0} wlan:${addr wlan0}
${color2}ssid ${color1}|${color0} ${wireless_essid wlan0} ${wireless_link_qual_perc wlan0}%
${endif}\
${if_up eth0}\
${color2}if ${color1}|${color0} eth0:${addr eth0}
${endif}\
${color0}${stippled_hr}
${color2}down ${color1}|${color0} ${downspeed}/s
${color4}${downspeedgraph ff0000 0000ff}


+ 3
- 4
emacs.el Просмотреть файл

@@ -124,6 +124,7 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB."
(add-to-list 'default-frame-alist '(foreground-color . "gray10"))
;; (add-to-list 'default-frame-alist '(alpha . (80 100 100 100))) ; does not work?
)
;; (add-to-list 'default-frame-alist '(cursor-type . box))
(if window-system (menu-bar-mode 1) (menu-bar-mode 0))
(tool-bar-mode 0)
(set-scroll-bar-mode nil)
@@ -395,14 +396,12 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB."
(and (dllib-if-unfound "set-modeline-color"
"https://raw.github.com/10sr/emacs-lisp/master/set-modeline-color.el"
t)
(progn (set-face-background 'mode-line "white")
;(set-face-bold-p 'modeline-buffer-id t)
(require 'set-modeline-color nil t)))
(progn
(require 'set-modeline-color nil t)))

(set-face-background 'mode-line-inactive (if (face-inverse-video-p 'mode-line) "white" "black"))
(set-face-foreground 'mode-line-inactive (if (face-inverse-video-p 'mode-line) "black" "white"))


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; file handling



Загрузка…
Отмена
Сохранить