 
 Search through all items of the current buffer, or
 `db/org-default-org-file' if the current buffer is not associated
-with a file.  If ARG is non-nil, include all files in
-`org-agenda-files' and `org-agenda-text-search-extra-files' in
-this search.
+with a file.  If ARG is non-nil, include all files in the
+variables `org-agenda-files' and
+`org-agenda-text-search-extra-files' in this search.
 
 Use `org-store-link' to save link to `org-stored-links'."
   (interactive "P")

       (org-clock-update-time-maybe)))))

(defun db/find-csv-in-org (arg)
  "Interactively CSV find file and open it as Org mode table.
Default separator is \";\", but this can be changed interactively
by passing a universal argument."
  (interactive "P")
  (let ((separator (if arg (read-from-minibuffer "Separator (regular expression): ")
                     ";")))

;;; Agenda Customization

(defun db/check-special-org-files-in-agenda (&rest args)
  "Check special Org mode files to be part of the variable `org-agenda-files'.
The special Org mode files are `db/org-default-org-file',
`db/org-default-work-file', `db/org-default-home-file', and
`db/org-default-refile-file'.  Ignore ARGS."
  (ignore args)
  (require 'org)
  (let ((agenda-files (mapcar #'file-truename (org-agenda-files t))))
