===================================================================
RCS file: /cvs/palm/Palm-Keyring/test3.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- palm/Palm-Keyring/test3.pl	2006/02/02 00:59:08	1.2
+++ palm/Palm-Keyring/test3.pl	2006/04/18 20:39:45	1.3
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $RedRiver: palmkeyring-tk,v 1.1 2006/01/31 23:03:39 andrew Exp $
+# $RedRiver: palmkeyring-tk,v 1.2 2006/02/02 00:59:08 andrew Exp $
 ########################################################################
 # palmkeyring-tk *** A GUI for 'Keyring for PalmOS' written in perl
 # 
@@ -14,7 +14,8 @@
 use lib 'lib';
 use Palm::Keyring;
 
-my $File    = "Keys-Gtkr.PDB";
+#my $File    = "Keys-Gtkr.PDB";
+my $File    = "k:/working/Keys-Gtkr.PDB";
 my $Keyring = _do_open($File);
 
 my $NAME    = 'Palm Keyring';