Wikipedia:WikiProject User scripts/Scripts/Search links

// This script adds search links to the toolbox. 
 
addOnloadHook(function () {
    if (wgCanonicalNamespace == "Special")
        return;  // no links for special pages
 
    var title = wgTitle;
    if (wgCanonicalNamespace != "")
        title = title.replace(/^.*\//, "");  // subpage name only
 
    var query = encodeURIComponent('"'+title+'" -Wikipedia' ); 
    addPortletLink('p-tb', 'http://www.google.com/search?&q='+query,
                   'Web search', 't-googlesearch', 'Search Google for "'+title+'"', 'W');
    addPortletLink('p-tb', 'http://news.google.com/archivesearch?&as_price=p1&as_src=-newswire+-wire+-presswire+-PR+-press+-release&q='+query,
                   'News search', 't-googlenewssearch', 'Search Google News Archive for "'+title+'"', 'N');
    addPortletLink('p-tb', 'http://books.google.com/books?&as_brr=3&q='+query,
                   'Books search', 't-googlebookssearch', 'Search Google Books for "'+title+'"', 'B');
    addPortletLink('p-tb', 'http://scholar.google.com/scholar?&q='+query,
                   'Scholar search', 't-googlescholarsearch', 'Search Google Scholar for "'+title+'"', 'S');
});
 
//