From 52b2c29644c12b2d680f6b9b4df50a7f9ca02a09 Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Sun, 16 Nov 2025 17:24:31 +0100 Subject: [PATCH] Remove some obsolete function --- init.el | 1 - site-lisp/db-org.el | 16 ---------------- 2 files changed, 17 deletions(-) diff --git a/init.el b/init.el index 6c5c935..5ca4257 100644 --- a/init.el +++ b/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 diff --git a/site-lisp/db-org.el b/site-lisp/db-org.el index 7816705..f36c884 100644 --- a/site-lisp/db-org.el +++ b/site-lisp/db-org.el @@ -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)