This is a way to have accel keys assigned to various search engines. It is not great, but the best I could do on short notice. I cannot stop the query box from appearing, but you have to do nothing there but click OK. The statusbar will indicate the engine and query URL. It works with data in the URLBAR and SELECTED TEXT. You can add any additional engines as you wish. Just add a setaccel line and macro for each new engine.
# K-Meleon Macros (http://kmeleon.sourceforge.net/wiki/index.php?id=MacroLanguage)
# ---------- AltSearch --------------------------------------------------------------
# Allow a search choice using accel keys
# Dependencies : main.kmm
# Resources : -
# Preferences : kmeleon.general.searchEngine
#
# ------------------------------------------------------------------------------------
_AltSearch_Search_Wiki{
$_AltSearch_Original = getpref(STRING,"kmeleon.general.searchEngine");
$__AltSearch_Obj = $SelectedText != "" ? $SelectedText : $URLBAR != "" ? $URLBAR : "" ;
setpref(STRING,"kmeleon.general.searchEngine","earch/".$__AltSearch_Obj" rel="nofollow" >http://en.wikipedia.org/wiki/Specialearch/".$__AltSearch_Obj);
statusbar( getpref(STRING,"kmeleon.general.searchEngine"));
id(ID_NAV_SEARCH) ;
setpref(STRING,"kmeleon.general.searchEngine",$_AltSearch_Original);
}
_AltSearch_Search_Google{
$_AltSearch_Original = getpref(STRING,"kmeleon.general.searchEngine");
$__AltSearch_Obj = $SelectedText != "" ? $SelectedText : $URLBAR != "" ? $URLBAR : "" ;
setpref(STRING,"kmeleon.general.searchEngine","http://www.google.com/search?q=".$__AltSearch_Obj);
statusbar( getpref(STRING,"kmeleon.general.searchEngine"));
id(ID_NAV_SEARCH) ;
setpref(STRING,"kmeleon.general.searchEngine",$_AltSearch_Original);
}
_AltSearch_Search_Msn{
$_AltSearch_Original = getpref(STRING,"kmeleon.general.searchEngine");
$__AltSearch_Obj = $SelectedText != "" ? $SelectedText : $URLBAR != "" ? $URLBAR : "" ;
setpref(STRING,"kmeleon.general.searchEngine","http://search.msn.com/results.aspx?q=".$__AltSearch_Obj);
statusbar( getpref(STRING,"kmeleon.general.searchEngine"));
id(ID_NAV_SEARCH) ;
setpref(STRING,"kmeleon.general.searchEngine",$_AltSearch_Original);
}
_AltSearch_SetAccels{
# set Accel keys for search engines
setaccel( "CTRL SHIFT W" ,"MACROS(_AltSearch_Search_Wiki)");
setaccel( "CTRL SHIFT G" ,"MACROS(_AltSearch_Search_Google)");
setaccel( "CTRL SHIFT M" ,"MACROS(_AltSearch_Search_Msn)");
}
$OnInit=$OnInit."_AltSearch_SetAccels;";
$macroModules=$macroModules."AltSearch;";