From 69d68f772eec48d386a9c49b4d9451a6f9a87735 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Mon, 6 Jun 2016 00:13:03 +0200
Subject: Remove unused code

---
 emacs/.emacs.d/site-lisp/org-init.el | 9 ---------
 1 file changed, 9 deletions(-)

(limited to 'emacs/.emacs.d/site-lisp')

diff --git a/emacs/.emacs.d/site-lisp/org-init.el b/emacs/.emacs.d/site-lisp/org-init.el
index 84cada4..044d6cb 100644
--- a/emacs/.emacs.d/site-lisp/org-init.el
+++ b/emacs/.emacs.d/site-lisp/org-init.el
@@ -43,11 +43,6 @@
 (with-eval-after-load 'org-crypt
   (org-crypt-use-before-save-magic))
 
-(defun tagify (str)
-  "Remove dots, replace - with _ in STR."
-  (replace-regexp-in-string
-   "-" "_" (replace-regexp-in-string "\\." "" (downcase str))))
-
 (defun oni:color-for (object)
   "Generate a hex color by taking the first 6 characters of OBJECT's MD5 sum."
   (format "#%s" (substring (md5 object) 0 6)))
@@ -90,10 +85,6 @@ PLIST contains all the pertinent information."
       (format "* ACQUIRE %s %s - %s \n  SCHEDULED: <%s>"
               title episode name date))))
 
-(defun oni:org-colors-for (names)
-  "Create an alist for NAMES with corresponding colors."
-  (mapcar (lambda (name) (cons name (oni:color-for name))) names))
-
 (defun oni:note-template ()
   (concat
    "* %<%c>\n"
-- 
cgit v1.2.3-54-g00ecf