sigh
[freeside.git] / fs_webdemo / registerd.Pg
index 4713841..702d83d 100755 (executable)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl -w
 #
-# $Id: registerd.Pg,v 1.2 2001-04-23 16:25:05 ivan Exp $
+# $Id: registerd.Pg,v 1.3 2001-04-26 00:17:39 ivan Exp $
 
 use strict;
 use vars qw(
@@ -85,7 +85,7 @@ while ( 1 ) {
     my $username = $row->{'username'};
     my $email = $row->{'passwd'};
 
-    system("/usr/bin/createdb --username freeside demo_$username >/dev/null");
+    system("/usr/bin/createdb --username freeside demo_$username | mail ivan-createdb\@420.am");
 
     system "psql -U freeside demo_$username </usr/local/etc/freeside/demo_template.Pg";