CVS: ispman/bin ispman.dnsset,1.9,1.10 ispman.dnsunset,1.8,1.9

Update of /cvsroot/ispman/ispman/bin
In directory sc8-pr-cvs1:/tmp/cvs-serv28065

Modified Files:
	ispman.dnsset ispman.dnsunset 
Log Message:
Fixed bug #837441 (ispman.dnsunset doesn't create process)


Index: ispman.dnsset
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.dnsset,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -r1.9 -r1.10
*** ispman.dnsset	8 May 2003 13:20:11 -0000	1.9
--- ispman.dnsset	9 Jan 2004 21:47:01 -0000	1.10
***************
*** 35,51 ****
        &{"set_$opts{'t'}"}($_);
  
     }
!    exit;
! }
! 
! 
! unless ($ispman->branchExists($ispman->getDNSDN($opts{'d'}))){
!    print "Note: This domain branch did not exist.\n";
!    print "You may still add domains to DNS. but it will not be managed by ispman\n";
! }
  
! &{"set_$opts{'t'}"};
  
  
  
  
--- 35,51 ----
        &{"set_$opts{'t'}"}($_);
  
+       $ispman->modifyDnsProcess($_);
     }
! } else {
  
!    unless ($ispman->branchExists($ispman->getDNSDN($opts{'d'}))){
!       print "Note: This domain branch did not exist.\n";
!       print "You may still add domains to DNS. but it will not be managed by ispman\n";
!    }
  
+    &{"set_$opts{'t'}"};
  
+    $ispman->modifyDnsProcess($opts{'d'});
+ }
  
  

Index: ispman.dnsunset
===================================================================
RCS file: /cvsroot/ispman/ispman/bin/ispman.dnsunset,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** ispman.dnsunset	28 Aug 2003 08:23:03 -0000	1.8
--- ispman.dnsunset	9 Jan 2004 21:47:01 -0000	1.9
***************
*** 32,46 ****
        &{"unset_$opts{'t'}"}($_);
  
     }
-    exit;
- }
  
  
! unless ($ispman->branchExists($ispman->getDNSDN($opts{'d'}))){
!    print "Note: This domain branch did not exist.\n";
!    print "You may still add domains to DNS. but it will not be managed by ispman\n";
  }
  
- &{"unset_$opts{'t'}"};
  
  
--- 32,49 ----
        &{"unset_$opts{'t'}"}($_);
  
+       $ispman->modifyDnsProcess($_);
     }
  
+ } else {
+ 
+    unless ($ispman->branchExists($ispman->getDNSDN($opts{'d'}))){
+       print "Note: This domain branch did not exist.\n";
+       print "You may still add domains to DNS. but it will not be managed by ispman\n";
+    }
  
!    &{"unset_$opts{'t'}"};
!    $ispman->modifyDnsProcess($opts{'d'});
  }
  
  
  



-------------------------------------------------------
This SF.net email is sponsored by: Perforce Software.
Perforce is the Fast Software Configuration Management System offering
advanced branching capabilities and atomic changes on 50+ platforms.
Free Eval! http://www.perforce.com/perforce/loadprog.html