View the DQSD CVS repository here:
http://cvs.sourceforge.net/cgi-bin/viewcvs.cgi/dqsd/
Update of /cvsroot/dqsd/dqsd/searches
In directory sc8-pr-cvs1:/tmp/cvs-serv22702/searches
Modified Files:
banyg.xml qscb.xml rh2t.xml ts.xml vbsx.xml wrp.xml
Added Files:
loc.xml
Log Message:
fixed the nullArgs bugs in the following searches: vbsx, banyg, qscb, rh2t, ts, vbsx,
wrp - added new search loc.xml, and updated changelog
--- NEW FILE: loc.xml ---
<search function="loc">
<name>Library of Congress 'Thomas' bill lookup</name>
<description>
Search the Thomas LOC bill register.<br/>
<div class="helpboxDescLabels">Switches:</div>
<table class="helpboxDescTable">
<tr><td>/session</td><td> [current] </td><td>Session to search</td></tr>
<tr><td>/senate</td><td> - </td><td>Search Senate bills</td></tr>
<tr><td>/house</td><td> default </td><td>Search House of Representatives
bills</td></tr>
<tr><td>/bill</td><td> - </td><td>Bill number</td></tr>
</table>
<div class="helpboxDescLabels">Examples:</div>
<table class="helpboxDescTable">
<tr><td> loc 2357 </td></tr>
</table>
</description>
<category>Reference<category>General</category></category>
<link>http://thomas.loc.gov/</link>
<contributor>Shawn K. Hall</contributor>
<form name="locf"
action="http://thomas.loc.gov/cgi-bin/query";
method="post">
<input type="hidden" id="locdocidc" name="docidc108" value="" />
<input type="hidden" id="locqueryc" name="queryc108" value="" />
<input type="hidden" name="submit" value="Search" />
</form>
<script><![CDATA[
function loc(q)
{
if( nullArgs("loc", q) ) return false;
var locbill = "";
var locdate = new Date();
var locsearch = "";
var locsession = "";
var locwhere = "";
var args = parseArgs(q, "session, sess, bill, senate, sen, sb, s, house, hr, h");
for (var i = 0; i < args.switches.length; i++)
{
sw = args.switches[i];
switch(sw.name){
case "session":
locsession = sw.value; break;
case "sess":
locsession = sw.value; break;
case "bill":
locbill = sw.value; break;
case "senate":
locwhere = "s.b."; break;
case "sen":
locwhere = "s.b."; break;
case "sb":
locwhere = "s.b."; break;
case "s":
locwhere = "s.b."; break;
case "house":
locwhere = "h\.b\."; break;
case "hr":
locwhere = "h\.b\."; break;
case "h":
locwhere = "h\.b\."; break;
default:
locsearch = args.switches[i].name;
}
}
if ( locsession == "" )
locsession = ((locdate.getYear() - 1788)/2).toFixed();
if ( locwhere == "" ) locwhere = "h.r.";
if ( locbill == "" ) locbill = q;
if ( locsearch == "" ) locsearch = q;
if ( isNaN(parseInt(locsearch)) ){
if ( !isNaN(parseInt(locbill)) ){
document.locf.locdocidc.name = "docidc" + locbill;
document.locf.locdocidc.value = locbill;
}
document.locf.locqueryc.name = "queryc" + locsession;
document.locf.locqueryc.value = locsearch;
submitForm(locf);
} else {
openSearchWindow( "http://thomas.loc.gov/cgi-bin/bdquery/z\?d"; + locsession +
":" + locwhere + locbill + ":");
}
}
]]></script>
<copyright>
Copyright (c) 2002 David Bau
Distributed under the terms of the
GNU Public License, Version 2 (http://www.gnu.org/copyleft/gpl.txt)
</copyright>
</search>
Index: banyg.xml
===================================================================
RCS file: /cvsroot/dqsd/dqsd/searches/banyg.xml,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** banyg.xml 20 Sep 2003 19:00:06 -0000 1.2
--- banyg.xml 7 Oct 2003 22:01:13 -0000 1.3
***************
*** 55,58 ****
--- 55,59 ----
function banyg(q)
{
+ if( nullArgs( "banyg", q ) ) return false;
document.banygf.login.value = strYahooID;
document.banygf.passwd.value = strYahooPwd;
Index: qscb.xml
===================================================================
RCS file: /cvsroot/dqsd/dqsd/searches/qscb.xml,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** qscb.xml 30 Aug 2003 20:54:35 -0000 1.1
--- qscb.xml 7 Oct 2003 22:01:13 -0000 1.2
***************
*** 20,28 ****
</description>
<category>Functions</category>
! <link>http://www.ReliableAnswers.com/</link>
<contributor>Shawn K. Hall</contributor>
<form name="qscbf"
! action="http://reliableanswers.com/x/";
method="post">
<input type="hidden" name="q" value="" />
--- 20,28 ----
</description>
<category>Functions</category>
! <link>http://www.ReliableAnswers.com/x/dqsd/</link>
<contributor>Shawn K. Hall</contributor>
<form name="qscbf"
! action="http://reliableanswers.com/x/dqsd/";
method="post">
<input type="hidden" name="q" value="" />
***************
*** 113,120 ****
End Sub
Function ClipBoardSetText( sText )
! ClipBoardSetText = window.clipboardData.SetData( "Text", sText )
End Function
Function ClipBoardGetText()
! ClipBoardGetText = window.clipboardData.GetData( "Text" )
End Function
--- 113,120 ----
End Sub
Function ClipBoardSetText( sText )
! ClipBoardSetText = window.clipboardData.setData( "Text", sText )
End Function
Function ClipBoardGetText()
! ClipBoardGetText = window.clipboardData.getData( "Text" )
End Function
***************
*** 126,129 ****
--- 126,131 ----
function qscb (q)
{
+ if( nullArgs( "qscb", q ) ) return false;
+
document.qscbf.q.value = q;
Index: rh2t.xml
===================================================================
RCS file: /cvsroot/dqsd/dqsd/searches/rh2t.xml,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** rh2t.xml 30 Aug 2003 20:54:35 -0000 1.1
--- rh2t.xml 7 Oct 2003 22:01:13 -0000 1.2
***************
*** 22,30 ****
</description>
<category>Functions</category>
! <link>http://www.ReliableAnswers.com/</link>
<contributor>Shawn K. Hall</contributor>
<form name="rh2tf"
! action="http://reliableanswers.com/x/";
method="post">
<textarea style="display: none;" name="q"></textarea>
--- 22,30 ----
</description>
<category>Functions</category>
! <link>http://www.ReliableAnswers.com/x/dqsd/</link>
<contributor>Shawn K. Hall</contributor>
<form name="rh2tf"
! action="http://www.ReliableAnswers.com/x/dqsd/";
method="post">
<textarea style="display: none;" name="q"></textarea>
***************
*** 102,105 ****
--- 102,107 ----
function rh2t (q)
{
+ if( nullArgs( "rh2t", q ) ) return false;
+
document.rh2tf.q.value = q;
Index: ts.xml
===================================================================
RCS file: /cvsroot/dqsd/dqsd/searches/ts.xml,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** ts.xml 17 Aug 2003 19:02:25 -0000 1.1
--- ts.xml 7 Oct 2003 22:01:13 -0000 1.2
***************
*** 3,7 ****
<category>Computers<category>Networking</category></category>
<contributor>Shawn K. Hall</contributor>
! <link>http://ReliableAnswers.com/</link>
<email>[EMAIL PROTECTED]</email>
<description>
--- 3,7 ----
<category>Computers<category>Networking</category></category>
<contributor>Shawn K. Hall</contributor>
! <link>http://www.ReliableAnswers.com/x/dqsd/</link>
<email>[EMAIL PROTECTED]</email>
<description>
***************
*** 58,61 ****
--- 58,63 ----
function ts(q)
{
+ if( nullArgs( "ts", q ) ) return false;
+
document.tsf.Server.value = "";
Index: vbsx.xml
===================================================================
RCS file: /cvsroot/dqsd/dqsd/searches/vbsx.xml,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** vbsx.xml 5 Oct 2003 23:04:12 -0000 1.2
--- vbsx.xml 7 Oct 2003 22:01:13 -0000 1.3
***************
*** 5,9 ****
<div class="helpboxDescLabels">Usage:</div>
<table class="helpboxDescTable">
! <tr><td>vbsx <em>[?]vb-script</em></td></tr>
</table>
<div class="helpboxDescLabels">Switches:</div>
--- 5,9 ----
<div class="helpboxDescLabels">Usage:</div>
<table class="helpboxDescTable">
! <tr><td>vbsx <em>[?][:][=][!]vb-script</em></td></tr>
</table>
<div class="helpboxDescLabels">Switches:</div>
***************
*** 12,15 ****
--- 12,16 ----
<tr><td>=</td><td> - </td><td>Return value is to replace the text in DQSD,
like using Debug.Clear before Debug.Print in Visual Basic</td></tr>
<tr><td>:</td><td> - </td><td>Return value is to be placed on the
clipboard</td></tr>
+ <tr><td>!</td><td> - </td><td>Return value is popped in a message box</td></tr>
</table>
<div class="helpboxDescLabels">Supporting Functions:</div>
***************
*** 26,29 ****
--- 27,31 ----
<table class="helpboxDescTable">
<tr><td>vbsx msgbox("hi")</td></tr>
+ <tr><td>vbsx !"hi"</td></tr>
<tr><td>vbsx ?Replace("This ugly text", "ugly ", "")</td></tr>
<tr><td>vbsx ClipBoardSetText Replace(ClipBoardGetText, vbCrLf, " ")</td></tr>
***************
*** 32,40 ****
</description>
<category>Computers<category>Programming</category></category>
! <link>http://www.ReliableAnswers.com/</link>
<contributor>Shawn K. Hall</contributor>
<form name="vbsxf"
! action="http://reliableanswers.com/x/";
method="post">
<input type="hidden" name="qs" value="" />
--- 34,42 ----
</description>
<category>Computers<category>Programming</category></category>
! <link>http://www.ReliableAnswers.com/x/dqsd/</link>
<contributor>Shawn K. Hall</contributor>
<form name="vbsxf"
! action="http://www.ReliableAnswers.com/x/dqsd/";
method="post">
<input type="hidden" name="qs" value="" />
***************
*** 92,96 ****
function vbsx (q)
{
- //set debug mode
var qs = q;
if (q.length == 1) {
--- 94,97 ----
***************
*** 101,122 ****
case ":":
//show help
! window.execScript ("qsfind('vbsx');", "javascript");
! return ( true );
! }
! }else{
! switch (qs.charAt(0)){
! case "=":
! qs = "Call DebugClear() \nDebugPrint " + qs.substring(1, qs.length);
! break;
! case "?":
! qs = "DebugPrint " + qs.substring(1, qs.length);
! break;
! case "!":
! qs = "MsgBox " + qs.substring(1, qs.length);
! break;
! case ":":
! qs = "ClipboardSetText " + qs.substring(1, qs.length);
! break;
}
}
--- 102,125 ----
case ":":
//show help
! qs = "?";
}
+ }
+
+ if (nullArgs( "vbsx", qs )) return false;
+
+ //set debug mode
+ switch (qs.charAt(0)){
+ case "=":
+ qs = "Call DebugClear() \nDebugPrint " + qs.substring(1, qs.length);
+ break;
+ case "?":
+ qs = "DebugPrint " + qs.substring(1, qs.length);
+ break;
+ case "!":
+ qs = "MsgBox " + qs.substring(1, qs.length);
+ break;
+ case ":":
+ qs = "ClipboardSetText " + qs.substring(1, qs.length);
+ break;
}
Index: wrp.xml
===================================================================
RCS file: /cvsroot/dqsd/dqsd/searches/wrp.xml,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** wrp.xml 30 Aug 2003 20:54:35 -0000 1.1
--- wrp.xml 7 Oct 2003 22:01:13 -0000 1.2
***************
*** 27,35 ****
</description>
<category>Functions</category>
! <link>http://www.ReliableAnswers.com/</link>
<contributor>Shawn K. Hall</contributor>
<form name="wrpf"
! action="http://reliableanswers.com/x/";
method="post">
<input type="hidden" name="q" value="" />
--- 27,35 ----
</description>
<category>Functions</category>
! <link>http://www.ReliableAnswers.com/x/dqsd/</link>
<contributor>Shawn K. Hall</contributor>
<form name="wrpf"
! action="http://www.ReliableAnswers.com/x/dqsd/";
method="post">
<input type="hidden" name="q" value="" />
***************
*** 121,128 ****
End Function
Function ClipBoardSetText( sText )
! ClipBoardSetText = window.clipboardData.SetData( "Text", sText )
End Function
Function ClipBoardGetText()
! ClipBoardGetText = window.clipboardData.GetData( "Text" )
End Function
--- 121,128 ----
End Function
Function ClipBoardSetText( sText )
! ClipBoardSetText = window.clipboardData.setData( "Text", sText )
End Function
Function ClipBoardGetText()
! ClipBoardGetText = window.clipboardData.getData( "Text" )
End Function
***************
*** 134,137 ****
--- 134,144 ----
function wrp (q)
{
+ if (q.length == 1) {
+ if (q.charAt(0) == "?"){
+ //show help
+ if (nullArgs( "wrp", "?" )) return true;
+ }
+ }
+
document.wrpf.q.value = q;
-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf
_______________________________________________
DQSD-CVS mailing list
https://lists.sourceforge.net/lists/listinfo/dqsd-cvs
DQSD CVS repository:
http://cvs.sourceforge.net/cgi-bin/viewcvs.cgi/dqsd/
