From 48ce381845283b0ba432b06043ee4bf30790936f Mon Sep 17 00:00:00 2001 From: Daniel Borchmann Date: Mon, 27 Aug 2018 21:28:39 +0200 Subject: [PATCH] [Utils] Remove obsolete org utility function --- site-lisp/db-utils.el | 20 -------------------- 1 file changed, 20 deletions(-) diff --git a/site-lisp/db-utils.el b/site-lisp/db-utils.el index 9def532..3133549 100644 --- a/site-lisp/db-utils.el +++ b/site-lisp/db-utils.el @@ -315,26 +315,6 @@ path." ;;; Org Utilities -(defun db/bank-csv-to-org-table () - (interactive) - (goto-char (point-min)) - (kill-line 8) - (while (re-search-forward "^\"\\|\"$\\|\";\"" nil :no-error) - (replace-match "|")) - (goto-char (point-min)) - (org-mode) - (org-table-align) - ;; move columns around - (cl-loop - for (word . count) in '(("Wertstellung" . 6) - ("Umsatzart" . 6) - ("Buchungsdetails" . 3)) - do (progn (goto-char (point-min)) - (search-forward word) - (dotimes (_ count) - (org-table-move-column-right)))) - (goto-char (point-min))) - (defun db/org-cleanup-continuous-clocks () "Join continuous clock lines in the current buffer." (interactive)