|
|
|
@ -1185,8 +1185,8 @@ |
|
|
|
#+end_src |
|
|
|
#+end_src |
|
|
|
- Sleeker time-grid |
|
|
|
- Sleeker time-grid |
|
|
|
#+begin_src emacs-lisp |
|
|
|
#+begin_src emacs-lisp |
|
|
|
(setq org-agenda-time-grid '((daily today require-timed) |
|
|
|
(setq org-agenda-time-grid '((daily today require-timed remove-match) |
|
|
|
(800 1000 1200 1400 1600 1800 2000) |
|
|
|
(800 900 1000 1100 1200 1300 1400 1500 1600 1700 1800 1900 2000) |
|
|
|
" ······· " "───────────────") |
|
|
|
" ······· " "───────────────") |
|
|
|
org-agenda-current-time-string "····· now ·····" |
|
|
|
org-agenda-current-time-string "····· now ·····" |
|
|
|
org-agenda-time-leading-zero t) |
|
|
|
org-agenda-time-leading-zero t) |
|
|
|
@ -1244,11 +1244,11 @@ |
|
|
|
""))) |
|
|
|
""))) |
|
|
|
|
|
|
|
|
|
|
|
(format (concat "\n" |
|
|
|
(format (concat "\n" |
|
|
|
"%9s %s %4d%s\n" |
|
|
|
"%9s %s %4d%s\n" |
|
|
|
"%9s \n" |
|
|
|
"%9s \n" |
|
|
|
"%9s %-10s\n" |
|
|
|
"%9s %-10s\n" |
|
|
|
"%9s \n" |
|
|
|
"%9s \n" |
|
|
|
"%9s %s\n") |
|
|
|
"%9s %s\n") |
|
|
|
(figlet-num day 0) monthname year weekstring |
|
|
|
(figlet-num day 0) monthname year weekstring |
|
|
|
(figlet-num day 1) |
|
|
|
(figlet-num day 1) |
|
|
|
(figlet-num day 2) dayname |
|
|
|
(figlet-num day 2) dayname |
|
|
|
|
Jacopo De Simoi
3 years ago