Remove some obsolete function
This commit is contained in:
parent
4c37de8f71
commit
52b2c29644
1
init.el
1
init.el
@ -738,7 +738,6 @@ split horizontally again, but this extra work should not matter much."
|
||||
endless/org-ispell
|
||||
db/org-agenda-insert-active-filters
|
||||
db/org-agenda-insert-efforts
|
||||
db/org-timestamp-difference
|
||||
db/org-capture-code-snippet
|
||||
db/org-onenote-open
|
||||
db/org-outlook-open
|
||||
|
||||
@ -335,22 +335,6 @@ Add this function to `org-agenda-finalize-hook' to enable this."
|
||||
|
||||
;;; Capturing
|
||||
|
||||
(defun db/org-timestamp-difference (stamp-1 stamp-2)
|
||||
"Return time difference between two Org mode timestamps.
|
||||
STAMP-1 and STAMP-2 must be understood by
|
||||
`org-parse-time-string'."
|
||||
;; Things copied from `org-clock-update-time-maybe’
|
||||
(let* ((s (-
|
||||
(float-time
|
||||
(apply #'encode-time (org-parse-time-string stamp-2 t)))
|
||||
(float-time
|
||||
(apply #'encode-time (org-parse-time-string stamp-1 t)))))
|
||||
(neg (< s 0))
|
||||
(s (abs s))
|
||||
(h (floor (/ s 3600)))
|
||||
(m (floor (/ (- s (* 3600 h)) 60))))
|
||||
(format (if neg "-%d:%02d" "%2d:%02d") h m)))
|
||||
|
||||
;; Capture Code Snippets
|
||||
;; from http://ul.io/nb/2018/04/30/better-code-snippets-with-org-capture/
|
||||
(defun db/org-capture-code-snippet (filename)
|
||||
|
||||
Loading…
Reference in New Issue
Block a user