Kajetan Rzepecki Idorobots
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require 'cpu-stats) | |
| (setq cpu-usage-update-interval 1) | |
| (setq cpu-usage-format "Average: %A CPU0: %C0 CPU1: %C1") | |
| (cpu-usage-start) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require 'memory-stats) | |
| (setq memory-usage-update-interval 5) | |
| (setq memory-usage-format "Mem: %R Free: %F Swap: %S") | |
| (memory-usage-start) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require 'network-speed) | |
| (setq network-speed-update-interval 5) | |
| (setq network-speed-precision 1) | |
| (setq network-speed-interface-list '("wlan0" "eth0")) | |
| (setq network-speed-format-string "Down: %RB Up: %TB") | |
| (network-speed-start) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (require 'misc-stats) | |
| (setq misc-stats-update-interval 10) | |
| (setq misc-stats-format "Emacs uptime: %E Load average: %L1") | |
| (misc-stats-start) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ;; MODES | |
| (require 'battery) | |
| (setq battery-mode-line-format "#%b %p %t") | |
| (setq battery-load-critical 7) | |
| (setq battery-load-low 25) | |
| (display-battery-mode t) | |
| (require 'network-speed) | |
| (setq network-speed-update-interval 5) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (setq mode-line-format | |
| (list '(:eval (message "Using `message' here is a bad idea...")) | |
| '(:propertize " No really. Stop it!" | |
| face font-lock-warning-face) | |
| )) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defvar my-vc-alist '(;; Everything is ok: | |
| (up-to-date some-green-face) | |
| ;; Kinda important: | |
| (edited some-yellow-face) | |
| (added some-yellow-face) | |
| ;; Most important: | |
| ;; ... | |
| )) | |
| (setq mode-line-format |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (setq mode-line-format | |
| (list ;; ... | |
| '(:propertize "%@" help-echo (concat "Default directory is: " | |
| default-directory) | |
| mouse-face mode-line-highlight) | |
| ;; ... | |
| )) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (defvar some-image (create-image "foo.xpm" 'xpm nil | |
| :ascent 'center)) | |
| (setq mode-line-format | |
| (list ;; ... | |
| '(:eval (propertize "unimportant" 'display some-image)) | |
| ;; ... | |
| )) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| RM = rm | |
| CC = gcc | |
| CFLAGS = -Wall -pedantic -O4 -ffast-math | |
| LDLIBS = -lm | |
| TARGET = foo | |
| OBJS = foo.o main.o | |
| all: $(TARGET) |