[siesta-commit] siesta/bin tequila,1.14,1.15

[prev] [thread] [next] [lurker] [Date index for 2002/09/05]

From: clampr
Subject: [siesta-commit] siesta/bin tequila,1.14,1.15
Date: 14:53 on 05 Sep 2002
Update of /cvsroot/siesta/siesta/bin
In directory usw-pr-cvs1:/tmp/cvs-serv12537

Modified Files:
	tequila 
Log Message:
hardcode back for plough


Index: tequila
===================================================================
RCS file: /cvsroot/siesta/siesta/bin/tequila,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- tequila	1 Sep 2002 12:09:15 -0000	1.14
+++ tequila	5 Sep 2002 13:53:19 -0000	1.15
@@ -1,17 +1,12 @@
 #!/usr/bin/perl -w
 use strict;
 use lib '/home/richardc/lab/siesta/lib';
-use constant debug => 1;
-use Siesta::Config;
-#use diagnostics;
-#$SIG{__WARN__} = sub { die @_ };
-
 use Siesta;
 
-my $DBI = "dbi:SQLite:".$Siesta::Config::DBFILE;
+use constant debug => 1;
 
 eval {
-    Siesta->connect( DBI => qw( $DBI ) );
+    Siesta->connect( DBI => "dbi:SQLite:/home/richardc/lab/siesta/bin/siesta.db" );
     Siesta->process( list => $ARGV[0], action => $ARGV[1], mail => \*STDIN );
 };
 if ($@) {



Generated at 13:57 on 01 Jul 2004 by mariachi 0.52