From a89c7128ce58bff1017985172ac7ae1f1f215ec2 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Tue, 7 Jun 2016 00:51:18 +0200
Subject: Add username/password to scuttle feed

---
 emacs/.emacs.d/site-lisp/org-init.el | 12 ++++++++++--
 1 file changed, 10 insertions(+), 2 deletions(-)

(limited to 'emacs/.emacs.d')

diff --git a/emacs/.emacs.d/site-lisp/org-init.el b/emacs/.emacs.d/site-lisp/org-init.el
index 044d6cb..8a42e8d 100644
--- a/emacs/.emacs.d/site-lisp/org-init.el
+++ b/emacs/.emacs.d/site-lisp/org-init.el
@@ -40,6 +40,12 @@
 
 (autoload 'org-clocking-p "org-clock")
 
+(defvar oni:org-scuttle-feed-username nil
+  "Username used by the scuttle feed.")
+
+(defvar oni:org-scuttle-feed-password nil
+  "Password used by the scuttle feed.")
+
 (with-eval-after-load 'org-crypt
   (org-crypt-use-before-save-magic))
 
@@ -200,12 +206,14 @@ predecessor if there is a non-DONE sibling defined before it."
 (setq org-agenda-todo-ignore-scheduled t)
 (setq org-html-htmlize-output-type 'css)
 (setq org-feed-alist
-      '(("MyEpisodes"
+      `(("MyEpisodes"
          "http://www.myepisodes.com/rss.php?feed=mylist&uid=Slash&pwdmd5=04028968e1f0b7ee678b748a4320ac17"
          "~/documents/org/tasks" "MyEpisodes"
          :formatter oni:myepisodes-formatter)
         ("Lookat bookmarks"
-         "https://ryuslash.org/scuttle/api/posts_all.php?tag=lookat&order=asc&type=rss"
+         ,(format "https://%s:%s@ryuslash.org/scuttle/api/posts_all.php?tag=lookat&order=asc&type=rss"
+                  oni:org-scuttle-feed-username
+                  oni:org-scuttle-feed-password)
          "~/documents/org/tasks" "Inbox"
          :template "
 * TODO %h  :bookmark:
-- 
cgit v1.2.3-54-g00ecf