Ignore:
Timestamp:
1999-10-19T16:27:42+13:00 (25 years ago)
Author:
davidb
Message:

Macros to support webpage based collection building
and internal and external links in collection documents

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gsdl/macros/pref.dm

    r666 r725  
    3434    argo = "";
    3535    argb = "";
     36        argel = "";
     37        argil = "";
    3638
    3739    function initialize () \{
     
    4244    function updatehrefs () \{
    4345        for (i = 0; i < document.links.length; i++)
    44             document.links[i].href = savedhrefs[i] + argk + args + argm + argo + argb;
     46            document.links[i].href = savedhrefs[i] + argk + args + argm + argo + argb + argel + argil;
    4547    \}
    4648
     
    7779    \}
    7880
     81    function updateel () \{
     82        value = document.PrefForm.el.options[document.PrefForm.el.selectedIndex].value;
     83        if (value != "_cgiargel_") argel = "&el=" + value;
     84        else argel = "";
     85        updatehrefs();
     86    \}
     87
     88    function updateil () \{
     89        value = document.PrefForm.il.options[document.PrefForm.il.selectedIndex].value;
     90        if (value != "_cgiargil_") argil = "&il=" + value;
     91        else argil = "";
     92        updatehrefs();
     93    \}
     94
    7995    function updatel () \{
    8096        value = document.PrefForm.l.options[document.PrefForm.l.selectedIndex].value;
    81         location.href = location.href + argk + args + argm + argo + argb + "&l=" + value;
     97        location.href = location.href + argk + args + argm + argo + argb + argel + argil + "&l=" + value;
    8298    \}
    8399
    84100    function updatev () \{
    85101        value = document.PrefForm.v.options[document.PrefForm.v.selectedIndex].value;
    86         location.href = location.href + argk + args + argm + argo + argb + "&v=" + value;
     102        location.href = location.href + argk + args + argm + argo + argb + argel + argil + "&v=" + value;
    87103    \}
    88104
    89105    function updatew () \{
    90106        value = document.PrefForm.w.options[document.PrefForm.w.selectedIndex].value;
    91         location.href = location.href + argk + args + argm + argo + argb + "&nw=" + value;
     107        location.href = location.href + argk + args + argm + argo + argb + argel + argil + "&nw=" + value;
    92108    \}
    93109
     
    160176}
    161177
     178_extlinkoption_ {
     179_textextlink_
     180<select name="el" onChange="updateel();">
     181  <option value="prompt"_If_("_cgiargel_" eq "prompt", selected)>
     182     through intermediate page
     183  <option value="direct"_If_("_cgiargel_" eq "direct", selected)>
     184     go directly there
     185</select>
     186}
     187
     188_intlinkoption_ {
     189_textintlink_
     190<select name="il" onChange="updateil();">
     191  <option value="l"_If_("_cgiargil_" eq "l", selected)>
     192     the digital library
     193  <option value="w"_If_("_cgiargil_" eq "w", selected)>
     194     the Web
     195</select>
     196}
     197
     198
    162199_languageoption_ {
    163200_textlanguage_
     
    196233<input type="hidden" name="e" value="_compressedoptions_">
    197234
    198 <p>_caseoption_
    199 
    200 <p>_stemoption_
     235<p>
     236_caseoption_
     237
     238<p>
     239_stemoption_
    201240
    202241<p>
     
    205244<p>
    206245_modeoption_
     246
     247<p>
     248_extlinkoption_
     249
     250<p>
     251_intlinkoption_
    207252
    208253<p>
     
    249294_textnostem_ { whole word must match}
    250295_textprefop_ {Return up to _maxdocoption_ hits with _hitsperpageoption_ hits per page.}
     296_textextlink_ {Access to external Web pages: }
     297_textintlink_ {Source documents retrieved from:}
    251298_textlanguage_ {Interface language: }
    252299_textencoding_ {Encoding: }
Note: See TracChangeset for help on using the changeset viewer.