still delicious

init-delicious.el

@@ -0,0 +1,2 @@
+(require 'delicious)
+(provide 'init-delicious)

init-emacs-w3m.el

@@ -41,16 +41,9 @@
       browse-url-browser-function 'w3m
       mm-text-html-renderer       'w3m)
 
-(defun ted-delicious-url ()
-  "Bookmark this page with del.icio.us."
-  (interactive)
-  (w3m-goto-url
-    (concat "http://del.icio.us/redguardtoo?"
-            "url="    (w3m-url-encode-string w3m-current-url)
-            "&title=" (w3m-url-encode-string w3m-current-title))))
 ;bind this function to ‘a’, which is the normal w3m bookmark binding:
 (eval-after-load "w3m" '(progn
-                          (define-key w3m-info-like-map "A" 'ted-delicious-url)))
+                          (define-key w3m-info-like-map "A" 'delicious-post)))
 
 (require 'w3m-lnum)
 (autoload 'w3m-link-numbering-mode "w3m-lnum" nil t)

init.el

@@ -44,7 +44,6 @@
 (require 'init-ibuffer)
 (require 'init-flymake)
 (require 'init-artbollocks-mode)
-
 (require 'init-recentf)
 (require 'init-ido)
 (require 'init-hippie-expand)
@@ -106,6 +105,7 @@
 (require 'init-cmake-mode)
 (require 'init-csharp-mode)
 (require 'init-linum-mode)
+(require 'init-delicious)
 (require 'init-emacs-w3m)
 (require 'init-eim)
 (require 'init-thing-edit)