Delicious.kmm

You can download this code from here

# delicious.kmm
#
# Macros for posting bookmarks to Delicious, a social bookmarks manager.
# You need to be logged in at Delicious before invoking this macro.

_delicious{
$OpenURL="http://delicious.com/save?url=".urlencode($__url);
$OpenURL=$OpenURL."&title=".urlencode($__title);
$OpenURL=$OpenURL."&v=5&noui=1&jump=bookmarks";
&OpenURL_InNew;
}



/////////////////////////////////////\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
Using it:

 Hit F12 to post to del.icio.us.
Hit Shift-F12 to set the del.icio.us user name.
F12 will also prompt you for the del.icio.us user name if you haven't previously set one up.

delicious_page{
menugrayed=(hostname($URL)=="");
$__url=$URL;
$__title=$TITLE==""?$URL:$TITLE;
&_delicious;
}

delicious_link{
$__url=$LinkURL;
$__title=$LinkURL;
&_delicious;
}

_delicious_buildmenu{
setmenu(Document,macro,"Post to Delicious",delicious_page,-1);
setmenu(LinkPopup,macro,"Post link to Delicious",delicious_link,-1);
setmenu(FrameLinkPopup,macro,"Post link to Delicious",delicious_link,-1);
}

_delicious_buildaccel{
setaccel("VK_F12", "macros(delicious_page)");
}

$OnInit=$OnInit."_delicious_buildmenu;_delicious_buildaccel;";
$macroModules=$macroModules."delicious;";

# vim:set tw=0:
# -- The End --