diff options
| -rw-r--r-- | .emacs | 12 | ||||
| -rw-r--r-- | .emacs-custom.el | 2 |
2 files changed, 12 insertions, 2 deletions
@@ -416,6 +416,12 @@ (add-hook 'c-mode-common-hook 'my/c-modes-hook) +(defun my/calendar-iso-week (year month day) + ;; NIH version of (describe-variable 'calendar-intermonth-text). + (propertize + (format-time-string "%V" (encode-time (list 0 0 0 day month year))) + 'font-lock-face 'eighters-date)) + (defun my/compilation-notify (buffer results) (let* ((title (buffer-name buffer)) (status (if (string-equal results "finished\n") "success" "failure")) @@ -679,6 +685,12 @@ (my/list-update package-archives '(("melpa" . "https://melpa.org/packages/"))))) +(use-package calendar + :custom + (calendar-intermonth-text '(my/calendar-iso-week year month day)) + (calendar-today-visible-hook '(calendar-mark-today)) + (calendar-week-start-day 1)) + (use-package diff-hl :custom (diff-hl-flydiff-mode t) diff --git a/.emacs-custom.el b/.emacs-custom.el index d1324d0..709ed2f 100644 --- a/.emacs-custom.el +++ b/.emacs-custom.el @@ -7,8 +7,6 @@ '(async-shell-command-buffer 'new-buffer) '(auto-revert-avoid-polling t) '(backup-directory-alist '(("" . "~/.emacs.backup"))) - '(calendar-today-visible-hook '(calendar-mark-today)) - '(calendar-week-start-day 1) '(column-number-mode t) '(comint-scroll-show-maximum-output nil) '(delete-selection-mode t) |