[org] Adjust my working hours to my actual contract

This commit is contained in:
Sebastian Schulze 2023-10-15 21:10:44 +02:00
parent b0228f8659
commit 60d6e86cfd
No known key found for this signature in database
GPG Key ID: F6BA63C6A7D3044E
1 changed files with 5 additions and 3 deletions

View File

@ -301,9 +301,11 @@
(defun bascht/alfatraining-hours-a-day (date)
(cond
((string-match " Tue" date) "8:00")
((string-match " Wed" date) "8:00")
((string-match " Thu" date) "8:00")
((string-match "Mon" (s-trim date)) 4)
((string-match "Tue" (s-trim date)) 8)
((string-match "Wed" (s-trim date)) 8)
((string-match "Thu" (s-trim date)) 8)
((string-match "Fri" (s-trim date)) 2)
(t "0:00")))
(defun bascht/org-file-show-headings (org-file)