From 771abb84830678455de4625ac7f082d8100f0ea0 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Tue, 2 Feb 2021 05:16:17 +0000
Subject: libs -> lib/

---
 org/jao-org-utils.el | 43 -------------------------------------------
 1 file changed, 43 deletions(-)
 delete mode 100644 org/jao-org-utils.el

(limited to 'org/jao-org-utils.el')

diff --git a/org/jao-org-utils.el b/org/jao-org-utils.el
deleted file mode 100644
index 8d65ed7..0000000
--- a/org/jao-org-utils.el
+++ /dev/null
@@ -1,43 +0,0 @@
-(require 'org)
-
-;;; links
-(defun jao-org-link-at-point (&optional copy)
-  (when (thing-at-point-looking-at "\\[\\[\\([^]]+\\)\\]\\[[^]]+\\]\\]")
-    (when copy (kill-ring-save (match-beginning 1) (match-end 1)))
-    (match-string-no-properties 1)))
-
-(defun jao-org-copy-link-at-point ()
-  (interactive)
-  (message "%s" (or (jao-org-link-at-point t) "No link at point")))
-
-(defun jao-org-insert-link (url title)
-  (insert (format "[[%s][%s]]" url title)))
-
-;;; eldoc
-(defun jao-org-eldoc--hook ()
-  (set (make-local-variable 'eldoc-documentation-function)
-       'jao-org-link-at-point)
-  (eldoc-mode))
-
-;;;###autoload
-(defun jao-org-utils-eldoc-setup ()
-  (add-hook 'org-mode-hook 'jao-org-eldoc--hook))
-
-;;; play fair with saveplace
-(defun jao-org--show-if-hidden ()
-  (when (outline-invisible-p)
-    (save-excursion
-      (outline-previous-visible-heading 1)
-      (org-show-subtree))))
-
-;;; verifying org refile targets
-(defun jao-org--refile-target-verify ()
-  (not (looking-at-p ".*\\[\\[.+$")))
-
-;;;###autoload
-(defun jao-org-utils-setup ()
-  (setq org-refile-target-verify-function 'jao-org--refile-target-verify)
-  (add-hook 'org-mode-hook 'jao-org--show-if-hidden t))
-
-
-(provide 'jao-org-utils)
-- 
cgit v1.2.3