From 9bdcd4171c17f020420b6d8c8e7b335695b2abb1 Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 26 Apr 2001 00:17:39 +0000 Subject: [PATCH] sigh --- fs_webdemo/registerd.Pg | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/fs_webdemo/registerd.Pg b/fs_webdemo/registerd.Pg index 471384137..702d83d06 100755 --- a/fs_webdemo/registerd.Pg +++ b/fs_webdemo/registerd.Pg @@ -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