Navigation

Changeset 132

Timestamp:

03/02/06 18:04:11 (3 years ago)

Author:

ludo

Message:

also rename the inventory db (from r3099)

Files:

r130	r132
1217	1217	<input type=hidden name=mac value="$mac">
1218	1218	<input type=hidden name=menu value="$menu">
	1219	<input type=hidden name=oldname value="$n">
1219	1220	<input type=hidden name=form value="title">
1220	1221	<input type=hidden name=redir_flag value="$redir_flag">

r4	r132
74	74
75	75	my $t = $in{'title'};
	76	my $old = $in{'oldname'};
76	77	my $g = "$in{'pregroup'}/$in{'group'}";
77	78	my $p = $in{'profile'} \|\| $in{'preprofile'};
…	…
104	105	open(HOST,">$lbs_home/images/".toMacFileName($mac)."/hostname") ;
105	106	print HOST $t;
106		close(HOST) ;
107
	107	close(HOST);
	108
	109	# rename for other modules
	110	# ...will be moved to lbs_common soon
	111	foreach my $mod ("lrs-inventory", "backuppc") {
	112	if (-x "../$mod/lrs-admin") {
	113	system("unset SERVER_SOFTWARE;unset SERVER_NAME;unset GATEWAY_INTERFACE;unset REQUEST_METHOD;unset SCRIPT_FILENAME;unset QUERY_STRING;../$mod/lrs-admin rename $mac $old $t >/dev/null");
	114	}
	115	}
	116
108	117	redirect($redir) ;
109	118	exit(0) ;