Browse Source

Move `org-uniquify' into "org-macs.el"

* lisp/org.el (org-uniquify): Move function...
* lisp/org-macs.el: ... here.
Nicolas Goaziou 7 years ago
parent
commit
32890ea5a5
2 changed files with 4 additions and 4 deletions
  1. 4 0
      lisp/org-macs.el
  2. 0 4
      lisp/org.el

+ 4 - 0
lisp/org-macs.el

@@ -311,6 +311,10 @@ This is in contrast to merely setting it to 0."
       (setq plist (cddr plist)))
     p))
 
+(defsubst org-uniquify (list)
+  "Non-destructively remove duplicate elements from LIST."
+  (let ((res (copy-sequence list))) (delete-dups res)))
+
 
 
 ;;; Regexp matching

+ 0 - 4
lisp/org.el

@@ -186,10 +186,6 @@ Stars are put in group 1 and the trimmed body in group 2.")
 
 (defvar ffap-url-regexp)		;Silence byte-compiler
 
-(defsubst org-uniquify (list)
-  "Non-destructively remove duplicate elements from LIST."
-  (let ((res (copy-sequence list))) (delete-dups res)))
-
 (defsubst org-get-at-bol (property)
   "Get text property PROPERTY at the beginning of line."
   (get-text-property (point-at-bol) property))