make tinyurl

General : K-Meleon Web Browser Forum

General discussion about K-Meleon

Go to Topic: Previous•Next

Go to: Forum List•Message List•New Topic•Search•Log In•Print View

make tinyurl

Posted by: disrupted

Date: March 08, 2009 12:11AM

_{# K-Meleon Macros (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage)

# ---------- make tinyurl---------------------------------------------------------------------------------------------------------------

$_tool_path=getfolder(RootFolder)."\\Tools";

$_km_path=getfolder(RootFolder)."\\k-meleon.exe";

tinyurl{

#menugrayed=(hostname($URL)=="");

$tiny = $URL;

$tiny = prompt("This will Create TinyURL from the following address:", "Generate TinyUrl", $tiny);

$tiny == "" ? "" : opentab("httpee://t1ny.us/l.php?long=".$tiny);

}

tinyurl_BuildMenu{

setmenu(WebServices,macro,"Generate TinyURL",tinyurl);

}

$OnInit=$OnInit."tinyurl_BuildMenu;";

# ------------------------------------------------------------------------------------------------------------------

$macroModules=$macroModules."tinyurl;";}