SVN: toys/stbr/stbr.tcl
shadzik
shadzik at pld-linux.org
Sat Jun 13 10:13:27 CEST 2009
Author: shadzik
Date: Sat Jun 13 10:13:27 2009
New Revision: 10394
Modified:
toys/stbr/stbr.tcl
Log:
- call sqlite once when deleting
- fixed issue where only application is deleted and not the requester
Modified: toys/stbr/stbr.tcl
==============================================================================
--- toys/stbr/stbr.tcl (original)
+++ toys/stbr/stbr.tcl Sat Jun 13 10:13:27 2009
@@ -145,8 +145,7 @@
set developer [exec sqlite $logfile "select recipient from application where spec='$spec' and date='$date';"]
set email ""; append email $developer; append email "@pld-linux.org"
putcmdlog "Deleting entry for: $spec on $date. Sending mail to $developer"
- exec sqlite $logfile "DELETE FROM application where spec='$spec' and date='$date';" &
- exec sqlite $logfile "DELETE FROM stbr where date='$date';" &
+ exec sqlite $logfile "DELETE FROM application where spec='$spec' and date='$date'; DELETE FROM stbr where date='$date';" &
exec $cancellation $spec $email $hand &
putserv "privmsg $chan :$nick: Request deleted. Cancellation e-mail sent to $developer"
}
More information about the pld-cvs-commit
mailing list