diff options
Diffstat (limited to 'emacs/custom')
-rw-r--r-- | emacs/custom/my-org.el (renamed from emacs/custom/fcuny-org.el) | 42 |
1 files changed, 21 insertions, 21 deletions
diff --git a/emacs/custom/fcuny-org.el b/emacs/custom/my-org.el index d5fe662..1c68600 100644 --- a/emacs/custom/fcuny-org.el +++ b/emacs/custom/my-org.el @@ -1,9 +1,9 @@ -;;; fcuny-org.el --- Configure org-mode +;;; my-org.el --- Configure org-mode ;;; Commentary: ;;; Code: -(require 'fcuny-vars) -(require 'fcuny-clipboard) +;; (require 'fcuny-vars) +;; (require 'fcuny-clipboard) (require 'use-package) @@ -42,7 +42,7 @@ load-language-list) :custom - (org-directory fcuny/org-directory) + ;; (org-directory fcuny/org-directory) ;; hide emphasis markup (org-hide-emphasis-markers t) @@ -138,19 +138,19 @@ ((org-agenda-overriding-header "Not yet started") (org-agenda-skip-function '(org-agenda-skip-entry-if 'deadline 'scheduled)))))))) -(defun fcuny/org-capture/link () - "Make a TODO entry with a link in clipboard. -The page title is used as an entry heading." - (let* ((url-string (s-trim (fcuny/clipboard-get-contents))) - (pdf (string-suffix-p "pdf" url-string))) - (unless pdf - (let ((page-title (org-web-tools--html-title (org-web-tools--get-url url-string)))) - (concat "* " - page-title - "\t%^g" - "\n:PROPERTIES:\n:CREATED: %T\n:URL: " - url-string - "\n:END:\n%?"))))) +;; (defun fcuny/org-capture/link () +;; "Make a TODO entry with a link in clipboard. +;; The page title is used as an entry heading." +;; (let* ((url-string (s-trim (fcuny/clipboard-get-contents))) +;; (pdf (string-suffix-p "pdf" url-string))) +;; (unless pdf +;; (let ((page-title (org-web-tools--html-title (org-web-tools--get-url url-string)))) +;; (concat "* " +;; page-title +;; "\t%^g" +;; "\n:PROPERTIES:\n:CREATED: %T\n:URL: " +;; url-string +;; "\n:END:\n%?"))))) (use-package org-web-tools :ensure t) @@ -166,12 +166,12 @@ The page title is used as an entry heading." ("n" "Note" entry (file "notes.org") "* %?\n:PROPERTIES:\n:CREATED: %T\n:END:\n") - ("l" "Bookmark" entry (file "bookmarks.org") - (function fcuny/org-capture/link)) + ;; ("l" "Bookmark" entry (file "bookmarks.org") + ;; (function fcuny/org-capture/link)) ("j" "Journal" entry (file+olp+datetree "journal.org") "* %?\n:PROPERTIES:\n:CREATED: %T\n:END:\n" :tree-type day)))) -(provide 'fcuny-org) -;;; fcuny-org.el ends here +(provide 'my-org) +;;; my-org.el ends here |