including error message, and moving session_id reset outside of the conditional block

[freeside.git] / bin / svc_domain.erase

diff --git a/bin/svc_domain.erase b/bin/svc_domain.erase
index c023661..435dd5f 100755 (executable)
--- a/bin/svc_domain.erase
+++ b/bin/svc_domain.erase
@@ -1,6 +1,4 @@
 #!/usr/bin/perl -w
-#
-# $Id: svc_domain.erase,v 1.1 2002-04-20 11:57:35 ivan Exp $
 
 use strict;
 use FS::UID qw(adminsuidsetup);