home *** CD-ROM | disk | FTP | other *** search
/ PC World 2008 September / PCWorld_2008-09_cd.bin / komunikace / kmeleon / K-Meleon1.1.3en-US.exe / macros / hotlink.kmm < prev    next >
Encoding:
Text File  |  2007-05-04  |  1.1 KB  |  30 lines
  1. # K-Meleon Macros (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage)
  2.  
  3. # ---------- Hotlinks ----------------------------------------------------------------------------------------------
  4. #
  5. # Dependencies    : main.kmm ($macroPrefBranch, OpenURL)
  6. # Resources    : -
  7. # Preferences    : kmeleon.plugins.macros.hotlink[0-9].url
  8. #          kmeleon.plugins.macros.hotlink[0-9].new
  9. #
  10. # ------------------------------------------------------------------------------------------------------------------
  11.  
  12. hotlink{
  13. $OpenURL=getpref(STRING,$_hotlink.$ARG.".url");
  14. $OpenURL==""?0:(getpref(BOOL,$_hotlink.$ARG.".new")==true?&OpenURL_InNew:open($OpenURL));
  15. }
  16.  
  17. # ----- PRIVATE
  18.  
  19. $_hotlink=$macroPrefBranch."hotlink";
  20.  
  21. _hotlink_SetAccels{
  22. $_i=0; while($_i!=10) &_hotlink_SetAccelsLoop;
  23. }
  24. _hotlink_SetAccelsLoop{
  25. setaccel("CTRL ".$_i,"macros(hotlink(".$_i."))"); $_i=$_i+1;
  26. }
  27. $OnInit=$OnInit."_hotlink_SetAccels;";
  28.  
  29. # ------------------------------------------------------------------------------------------------------------------
  30. $macroModules=$macroModules."hotlink;";