--- loncom/build/loncaparestoreconfigurations 2002/05/16 00:20:30 1.13 +++ loncom/build/loncaparestoreconfigurations 2002/07/27 22:39:56 1.14 @@ -2,7 +2,7 @@ # loncaparestoreconfigurations - restore data to new LON-CAPA conf files # -# $Id: loncaparestoreconfigurations,v 1.13 2002/05/16 00:20:30 harris41 Exp $ +# $Id: loncaparestoreconfigurations,v 1.14 2002/07/27 22:39:56 harris41 Exp $ # # YEAR=2000 # 10/25, 12/14 Scott Harrison @@ -29,7 +29,7 @@ # taken as the backup file. # --------------------------------------------- Define program version variable -$VERSION = sprintf("%d.%02d", q$Revision: 1.13 $ =~ /(\d+)\.(\d+)/); +$VERSION = sprintf("%d.%02d", q$Revision: 1.14 $ =~ /(\d+)\.(\d+)/); # ---------------------------------------------- Process command-line arguments my $suffix='.lpmlsave'; @@ -47,8 +47,6 @@ use strict; # restrict unsafe and poorly my @special_conf_files=( '/etc/httpd/conf/loncapa.conf', '/etc/httpd/conf/access.conf', - '/etc/smb.conf', - '/etc/samba/smb.conf' ); my %pvar; # store the PerlSetVar variable key/value combinations