diff options
author | Franck Cuny <franck@fcuny.net> | 2022-03-23 09:49:16 -0700 |
---|---|---|
committer | Franck Cuny <franck@fcuny.net> | 2022-03-23 09:49:16 -0700 |
commit | 0fa0c488addd9e888ddff9df68693ed1c00f0657 (patch) | |
tree | 8263b53384585005f5ecdda14f4ae1dc900d688d | |
parent | rename fcuny-git to my-git (diff) | |
download | emacs.d-0fa0c488addd9e888ddff9df68693ed1c00f0657.tar.gz |
rename fcuny-org to my-org
Diffstat (limited to '')
-rw-r--r-- | emacs/custom/my-org.el (renamed from emacs/custom/fcuny-org.el) | 42 | ||||
-rw-r--r-- | emacs/init.el | 2 |
2 files changed, 22 insertions, 22 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 diff --git a/emacs/init.el b/emacs/init.el index d77ed96..9c7d13e 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -44,7 +44,7 @@ (require 'my-edit (expand-file-name "custom/my-edit" user-emacs-directory)) (require 'my-text (expand-file-name "custom/my-text" user-emacs-directory)) (require 'my-git (expand-file-name "custom/my-git" user-emacs-directory)) -(require 'fcuny-org (expand-file-name "custom/fcuny-org" user-emacs-directory)) +(require 'my-org (expand-file-name "custom/my-org" user-emacs-directory)) (require 'fcuny-conf (expand-file-name "custom/fcuny-conf" user-emacs-directory)) (require 'fcuny-prog (expand-file-name "custom/fcuny-prog" user-emacs-directory)) (require 'fcuny-eshell (expand-file-name "custom/fcuny-eshell" user-emacs-directory)) |