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)