/[fuse_dbi]/trunk/examples/webgui.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/examples/webgui.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 44 by dpavlin, Tue Nov 16 15:34:25 2004 UTC revision 45 by dpavlin, Tue Nov 23 23:49:24 2004 UTC
# Line 182  my $sql = { Line 182  my $sql = {
182  my $dsn = $config->param('dsn');  my $dsn = $config->param('dsn');
183  my $db;  my $db;
184    
185  if ($dsn =~ m/DBI:(mysql|pg):/) {  if ($dsn =~ m/DBI:(mysql|pg):/i) {
186          $db = $1;          $db = lc($1);
187  } else {  } else {
188          print STDERR "can't find supported database (mysql/pg) in dsn: $dsn\n";          print STDERR "can't find supported database (mysql/pg) in dsn: $dsn\n";
189          exit 1;          exit 1;
# Line 210  my $mnt = Fuse::DBI->mount({ Line 210  my $mnt = Fuse::DBI->mount({
210          },          },
211  });  });
212    
213    if (! $mnt) {
214            print STDERR "can't mount filesystem!";
215            exit 1;
216    }
217    
218  print "Press enter to exit...";  print "Press enter to exit...";
219  my $foo = <STDIN>;  my $foo = <STDIN>;
220    

Legend:
Removed from v.44  
changed lines
  Added in v.45

  ViewVC Help
Powered by ViewVC 1.1.26