[vhffs-dev] [696] Remove unused/useless columns in vhffs_httpd |
[ Thread Index |
Date Index
| More vhffs.org/vhffs-dev Archives
]
Revision: 696
Author: gradator
Date: 2007-07-08 20:07:08 +0000 (Sun, 08 Jul 2007)
Log Message:
-----------
Remove unused/useless columns in vhffs_httpd
Modified Paths:
--------------
trunk/vhffs-api/src/Vhffs/Services/Httpd.pm
trunk/vhffs-backend/src/pgsql/initdb.sql.in
trunk/vhffs-compat/4.0.sql.in
trunk/vhffs-panel/admin/web/edit.pl
trunk/vhffs-panel/admin/web/edit_submit.pl
trunk/vhffs-panel/admin/web/show.pl
trunk/vhffs-panel/templates/admin/web/edit.tmpl
trunk/vhffs-panel/templates/admin/web/show.tmpl
trunk/vhffs-panel/templates/web/prefs.tmpl
trunk/vhffs-panel/web/prefs.pl
trunk/vhffs-panel/web/prefs_save.pl
Modified: trunk/vhffs-api/src/Vhffs/Services/Httpd.pm
===================================================================
--- trunk/vhffs-api/src/Vhffs/Services/Httpd.pm 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-api/src/Vhffs/Services/Httpd.pm 2007-07-08 20:07:08 UTC (rev 696)
@@ -83,11 +83,10 @@
die('Unable to create parent object') unless(defined($parent));
- my $sql = 'INSERT INTO vhffs_httpd(servername, crawl, owner_http, owner_rev, owner_uid, owner_gid, trafic, alert_state, alert_limit, object_id) VALUES(?, 1, ?, ?, ?, ?, 0, 0, 0, ?)';
+ my $sql = 'INSERT INTO vhffs_httpd(servername, owner_uid, owner_gid, object_id) VALUES(?, ?, ?, ?)';
-
my $sth = $dbh->prepare($sql);
- $sth->execute($servername, $user->get_uid, $user->get_uid, $user->get_uid, $group->get_gid, $parent->get_oid);
+ $sth->execute($servername, $user->get_uid, $group->get_gid, $parent->get_oid);
$dbh->commit;
$web = get_by_servername($main, $servername);
@@ -100,63 +99,23 @@
return $web;
}
+
=pod
=head2 commit
- $httpd->set_crawl(1);
- $httpd->commit();
+Commit modified changes to the database.
-Commits modification concerning craw, trafic and alert_limit.
-
=cut
sub commit
{
my $self = shift;
-
- my $sql = 'UPDATE vhffs_httpd SET crawl = ?, trafic = ?, alert_limit = ? WHERE servername = ?';
- $self->{'db'}->do($sql, undef, $self->{crawl}, $self->{trafic}, $self->{alert_limit}, $self->{servername});
-
$self->SUPER::commit;
}
=pod
-=head2 get/set_alertstate, get/set_alertlimit, get/set_trafic
-
-Handles trafic limit parameters.
-
-!!DEPRECATED!! Will be replaced with a more apropriate way of alert handling.
-
-=cut
-
-sub get_alertstate
-{
- my $self = shift;
- return $self->{'alert_state'};
-}
-
-sub get_alertlimit
-{
- my $self = shift;
- return $self->{'alert_limit'};
-}
-
-sub get_crawl
-{
- my $self = shift;
- return $self->{'crawl'};
-}
-
-sub set_crawl
-{
- my( $self , $value ) = @_;
- $self->{'crawl'} = $value;
-}
-
-=pod
-
=head2 get_servername
my $servername = $httpd->getservername;
@@ -171,58 +130,12 @@
return $self->{'servername'};
}
-=pod
-
-=head2 get_title
-
- my $servername = $httpd->getservername;
-
-Returns webarea server name.
-
-!!DEPRECATED!!
-
-=cut
-
-
-sub get_title
-{
- my $self = shift;
- return $self->{'servername'};
-}
-
-sub get_trafic
-{
- my $self = shift;
- return $self->{'trafic'};
-}
-
-
-sub set_trafic
-{
- my ($self , $value) = @_;
- $self->{'trafic'} = $value;
-}
-
-sub set_alertlimit
-{
- my ($self , $value) = @_;
- $self->{'alert_limit'} = $value;
-}
-
-sub set_alertstate
-{
- my ($self , $value) = @_;
- $self->{'alert_state'} = $value;
-}
-
sub set_user
{
my( $self , $user ) = @_;
$self->{'user'} = $user;
}
-
-
sub set_group
{
my( $self , $group ) = @_;
@@ -254,7 +167,7 @@
my $result;
my $tmp;
- $sql = 'SELECT h.httpd_id, h.servername, h.crawl, h.owner_http, h.owner_rev, h.owner_uid, h.owner_gid, h.trafic, h.alert_state, h.alert_limit, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id';
+ $sql = 'SELECT h.httpd_id, h.servername, h.owner_uid, h.owner_gid, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id';
if(defined $state) {
$sql .= ' AND o.state = ?';
push(@params, $state);
@@ -295,7 +208,7 @@
my $objs = [];
my $result;
- $sql = 'SELECT h.httpd_id, h.servername, h.crawl, h.owner_http, h.owner_rev, h.owner_uid, h.owner_gid, h.trafic, h.alert_state, h.alert_limit, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id WHERE h.servername LIKE ?';
+ $sql = 'SELECT h.httpd_id, h.servername, h.owner_uid, h.owner_gid, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id WHERE h.servername LIKE ?';
push(@params, $letter);
@@ -329,7 +242,7 @@
my $objs;
my $result;
- $sql = 'SELECT h.httpd_id, h.servername, h.crawl, h.owner_http, h.owner_rev, h.owner_uid, h.owner_gid, h.trafic, h.alert_state, h.alert_limit, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id';
+ $sql = 'SELECT h.httpd_id, h.servername, h.owner_uid, h.owner_gid, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id';
if( ( defined $state ) && ( $state < Vhffs::Constants::TO_DELETE ) ) {
$sql .= 'WHERE o.state= ? AND ( o.description LIKE ? OR w.servername LIKE ? )';
@@ -365,7 +278,7 @@
my $tmp;
- $sql = 'SELECT h.httpd_id, h.servername, h.crawl, h.owner_http, h.owner_rev, h.owner_uid, h.owner_gid, h.trafic, h.alert_state, h.alert_limit, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id AND h.owner_gid = ? ORDER BY servername';
+ $sql = 'SELECT h.httpd_id, h.servername, h.owner_uid, h.owner_gid, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id AND h.owner_gid = ? ORDER BY servername';
$sth = $vhffs->get_db_object()->prepare( $sql );
@@ -394,7 +307,7 @@
sub get_by_servername {
my ($main, $servername) = @_;
- my $sql = 'SELECT h.httpd_id, h.servername, h.crawl, h.owner_http, h.owner_rev, h.owner_uid, h.owner_gid, h.trafic, h.alert_state, h.alert_limit, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id WHERE h.servername = ?';
+ my $sql = 'SELECT h.httpd_id, h.servername, h.owner_uid, h.owner_gid, h.object_id, o.date_creation, o.description, o.state FROM vhffs_httpd h INNER JOIN vhffs_object o ON o.object_id = h.object_id WHERE h.servername = ?';
my $dbh = $main->get_db_object();
my @params;
@@ -417,12 +330,12 @@
}
sub _new {
- my ($class, $main, $httpd_id, $servername, $crawl, $owner_http, $owner_rev, $owner_uid, $owner_gid, $trafic, $alert_state, $alert_limit, $oid, $date_creation, $description, $state) = @_;
+ my ($class, $main, $httpd_id, $servername, $owner_uid, $owner_gid, $oid, $date_creation, $description, $state) = @_;
my $self = $class->SUPER::_new($main, $oid, $owner_uid, $date_creation, $description, $state, Vhffs::Constants::TYPE_HTTPD);
return undef unless(defined($self));
- foreach (qw(httpd_id servername crawl owner_http owner_rev owner_gid trafic alert_state alert_limit)) {
+ foreach (qw(httpd_id servername owner_gid)) {
no strict 'refs';
eval '$self->{$_} = $'.$_;
}
Modified: trunk/vhffs-backend/src/pgsql/initdb.sql.in
===================================================================
--- trunk/vhffs-backend/src/pgsql/initdb.sql.in 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-backend/src/pgsql/initdb.sql.in 2007-07-08 20:07:08 UTC (rev 696)
@@ -157,15 +157,9 @@
CREATE TABLE vhffs_httpd
(
httpd_id serial,
- servername varchar(200) NOT NULL DEFAULT ' ',
- crawl int4 NOT NULL default '1',
- owner_http int4 NOT NULL,
- owner_rev int4 NOT NULL,
- owner_uid int4,
- owner_gid int4,
- trafic int4 NOT NULL,
- alert_state int4 NOT NULL default '0',
- alert_limit int4 NOT NULL default '80',
+ servername varchar(200) NOT NULL,
+ owner_uid int4 NOT NULL,
+ owner_gid int4 NOT NULL,
object_id int4 NOT NULL,
CONSTRAINT vhffs_httpd_pkey PRIMARY KEY (httpd_id)
) WITH OIDS;
Modified: trunk/vhffs-compat/4.0.sql.in
===================================================================
--- trunk/vhffs-compat/4.0.sql.in 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-compat/4.0.sql.in 2007-07-08 20:07:08 UTC (rev 696)
@@ -1,5 +1,5 @@
-- OK, we try to minimize risks by setting sequences' current values to
--- the greatest id. Ideally, vhffs should be stopped during upgrade
+-- the upper id. Ideally, vhffs should be stopped during upgrade
SELECT setval('vhffs_object_object_id_seq', (SELECT COALESCE(MAX(object_id), 1) FROM vhffs_object));
SELECT setval('vhffs_groups_gid_seq', (SELECT COALESCE(MAX(gid), @MINGID@) FROM vhffs_groups));
@@ -217,3 +217,14 @@
-- add ml_name to vhffs_svn for commit system.
ALTER TABLE vhffs_svn ADD COLUMN ml_name varchar;
+
+-- delete unused/useless columns in vhffs-httpd
+ALTER TABLE vhffs_httpd DROP COLUMN crawl;
+ALTER TABLE vhffs_httpd DROP COLUMN owner_http;
+ALTER TABLE vhffs_httpd DROP COLUMN owner_rev;
+ALTER TABLE vhffs_httpd DROP COLUMN trafic;
+ALTER TABLE vhffs_httpd DROP COLUMN alert_state;
+ALTER TABLE vhffs_httpd DROP COLUMN alert_limit;
+ALTER TABLE vhffs_httpd ALTER owner_uid SET NOT NULL;
+ALTER TABLE vhffs_httpd ALTER owner_gid SET NOT NULL;
+ALTER TABLE vhffs_httpd ALTER servername DROP DEFAULT;
Modified: trunk/vhffs-panel/admin/web/edit.pl
===================================================================
--- trunk/vhffs-panel/admin/web/edit.pl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/admin/web/edit.pl 2007-07-08 20:07:08 UTC (rev 696)
@@ -93,38 +93,21 @@
$template->param( TEXT_SERVERNAME => gettext("Servername") );
- $template->param( TEXT_CRAWL => gettext("Crawl") );
- $template->param( TEXT_ALERT => gettext("Alert Limit") );
- $template->param( TEXT_ALERT_STATE => gettext("Alert state") );
$template->param( TEXT_GROUP => gettext("Group") );
$template->param( TEXT_OWNER => gettext("Owner") );
$template->param( TEXT_STATUS => gettext("Status") );
- $template->param( TEXT_CRAWL_YES => gettext("Use Crawl") );
- $template->param( TEXT_CRAWL_NO => gettext("Don't use Crawl") );
$template->param( TEXT_DESCRIPTION => gettext("Description") );
$template->param( SEND => gettext("Send") );
$template->param( TEXT_HISTORY => gettext("History") );
$template->param( VALUE_DESCRIPTION => CGI::escapeHTML( $object->get_description ) );
$template->param( VALUE_SERVERNAME => $object->get_servername );
- $template->param( VALUE_ALERT => $object->get_alertlimit );
- $template->param( VALUE_ALERT_STATE => $object->get_alertstate );
$template->param( VALUE_GROUP => Vhffs::Group::get_name_by_gid( $vhffs , $object->get_ownergid ));
$template->param( VALUE_OWNER => Vhffs::User::get_name_by_uid( $vhffs , $object->get_owneruid ));
my $oid = $object->{'object_id'};
$template->param( VALUE_HISTORY => "/history.pl?OID=$oid" );
- if( $object->get_crawl == 1 )
- {
- $template->param( SELECTED_CRAWL_YES => "selected" );
- }
- else
- {
- $template->param( SELECTED_CRAWL_NO => "selected" );
- }
-
-
$template->param( TEXT_STATUS_WAITING_FOR_VALIDATION => gettext("Waiting for validation") );
$template->param( TEXT_STATUS_VALIDATION_REFUSED => gettext("Validation refused") );
$template->param( TEXT_STATUS_WAITING_FOR_CREATION => gettext("Waiting for creation") );
Modified: trunk/vhffs-panel/admin/web/edit_submit.pl
===================================================================
--- trunk/vhffs-panel/admin/web/edit_submit.pl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/admin/web/edit_submit.pl 2007-07-08 20:07:08 UTC (rev 696)
@@ -91,10 +91,7 @@
$template = new HTML::Template( filename => $templatedir."/misc/simplemsg.tmpl" );
$object->set_status( $cgi->param( "STATUS" ) );
- $object->set_crawl( $cgi->param( "CRAWL" ) );
- $object->set_alertlimit( $cgi->param( "TEXT_ALERT") );
-
if( $object->commit < 0 )
{
$message = gettext("Can't modify object ...");
@@ -105,9 +102,6 @@
}
$template->param( MESSAGE => $message );
-
-
-
}
Modified: trunk/vhffs-panel/admin/web/show.pl
===================================================================
--- trunk/vhffs-panel/admin/web/show.pl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/admin/web/show.pl 2007-07-08 20:07:08 UTC (rev 696)
@@ -92,9 +92,6 @@
$template->param( TITLE => gettext("Show Web Area") );
$template->param( TEXT_SERVERNAME => gettext("Servername") );
- $template->param( TEXT_CRAWL => gettext("Crawl") );
- $template->param( TEXT_ALERT => gettext("Alert Limit") );
- $template->param( TEXT_ALERT_STATE => gettext("Alert state") );
$template->param( TEXT_GROUP => gettext("Group") );
$template->param( TEXT_OWNER => gettext("Owner") );
$template->param( TEXT_STATUS => gettext("Status") );
@@ -103,20 +100,12 @@
$template->param( VALUE_DESCRIPTION => CGI::escapeHTML( $object->get_description ) );
$template->param( VALUE_SERVERNAME => $object->get_servername );
- $template->param( VALUE_ALERT => $object->get_alertlimit );
- $template->param( VALUE_ALERT_STATE => $object->get_alertstate );
$template->param( VALUE_GROUP => Vhffs::Group::get_name_by_gid( $vhffs , $object->get_ownergid ));
$template->param( VALUE_OWNER => Vhffs::User::get_name_by_uid( $vhffs , $object->get_owneruid ));
my $oid = $object->{'object_id'};
$template->param( VALUE_HISTORY => "/history.pl?OID=$oid" );
- if( $object->get_crawl == 1 ) {
- $template->param( VALUE_CRAWL => gettext("Use Crawl") );
- } else {
- $template->param( VALUE_CRAWL => gettext("Don't use Crawl") );
- }
-
$template->param( VALUE_STATUS => Vhffs::Functions::status_string_from_status_id ($object->get_status) );
}
Modified: trunk/vhffs-panel/templates/admin/web/edit.tmpl
===================================================================
--- trunk/vhffs-panel/templates/admin/web/edit.tmpl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/templates/admin/web/edit.tmpl 2007-07-08 20:07:08 UTC (rev 696)
@@ -8,15 +8,6 @@
<TMPL_VAR NAME="VALUE_SERVERNAME">
</p>
<p>
- <label for="CRAWL">
- <TMPL_VAR NAME="TEXT_CRAWL">
- </label>
- <select name="CRAWL" id="CRAWL" >
- <option value="0" <TMPL_VAR name="SELECTED_CRAWL_NO">> <TMPL_VAR NAME="TEXT_CRAWL_NO"></option>
- <option value="1" <TMPL_VAR name="SELECTED_CRAWL_YES">> <TMPL_VAR NAME="TEXT_CRAWL_YES"></option>
- </select>
- </p>
- <p>
<label>
<TMPL_VAR NAME="TEXT_GROUP">
</label>
@@ -29,18 +20,6 @@
<TMPL_VAR NAME="VALUE_OWNER">
</p>
<p>
- <label for="TEXT_ALERT">
- <TMPL_VAR NAME="TEXT_ALERT">
- </label>
- <input type="text" name="TEXT_ALERT" id="TEXT_ALERT" VALUE="<TMPL_VAR NAME="VALUE_ALERT">"/>
- </p>
- <p>
- <label>
- <TMPL_VAR NAME="TEXT_ALERT_STATE">
- </label>
- <TMPL_VAR NAME="VALUE_ALERT_STATE">
- </p>
- <p>
<label for="STATUS">
<TMPL_VAR NAME="TEXT_STATUS">
</label>
Modified: trunk/vhffs-panel/templates/admin/web/show.tmpl
===================================================================
--- trunk/vhffs-panel/templates/admin/web/show.tmpl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/templates/admin/web/show.tmpl 2007-07-08 20:07:08 UTC (rev 696)
@@ -9,15 +9,6 @@
<br/>
</p>
<p>
- <label for="CRAWL">
- <TMPL_VAR NAME="TEXT_CRAWL">
- </label>
- <label for="CRAWL">
- <TMPL_VAR NAME="VALUE_CRAWL">
- </label>
- <br/>
- </p>
- <p>
<label for="TEXT_GROUP">
<TMPL_VAR NAME="TEXT_GROUP">
</label>
@@ -36,24 +27,6 @@
<br/>
</p>
<p>
- <label for="TEXT_ALERT">
- <TMPL_VAR NAME="TEXT_ALERT">
- </label>
- <label for="TEXT_ALERT">
- <TMPL_VAR NAME="VALUE_ALERT">
- </label>
- <br/>
- </p>
- <p>
- <label for="ALERT_STATE">
- <TMPL_VAR NAME="TEXT_ALERT_STATE">
- </label>
- <label for="ALERT_STATE">
- <TMPL_VAR NAME="VALUE_ALERT_STATE">
- </label>
- <br/>
- </p>
- <p>
<label for="STATUS">
<TMPL_VAR NAME="TEXT_STATUS">
</label>
Modified: trunk/vhffs-panel/templates/web/prefs.tmpl
===================================================================
--- trunk/vhffs-panel/templates/web/prefs.tmpl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/templates/web/prefs.tmpl 2007-07-08 20:07:08 UTC (rev 696)
@@ -9,31 +9,13 @@
<input type="hidden" name="name" id="name" value="<tmpl_var name="VALUE_SERVERNAME">" />
</p>
- <fieldset>
- <legend>
- <tmpl_var name="TEXT_CRAWL"> :
- </legend>
- <p>
- <input type="radio" name="CRAWL" id="CRAWL_YES" value="1" <tmpl_var name="YES_CHECKED"> />
- <label for="CRAWL_YES">
- <tmpl_var name="TEXT_YES">
- </label>
- </p>
- <p>
- <input type="radio" name="CRAWL" id="CRAWL_NO" value="0" <tmpl_var name="NO_CHECKED"> />
- <label for="CRAWL_NO">
- <tmpl_var name="TEXT_NO">
- </label>
- </p>
+ <p>
+ <label>
+ <tmpl_var name="TEXT_DESCRIPTION"> :
+ </label>
+ <textarea name="DESCRIPTION" id="DESCRIPTION" cols="45" rows="7"><tmpl_var name="VALUE_DESCRIPTION"></textarea>
+ </p>
- </fieldset>
- <p>
- <label>
- <tmpl_var name="TEXT_DESCRIPTION"> :
- </label>
- <textarea name="DESCRIPTION" id="DESCRIPTION" cols="45" rows="7"><tmpl_var name="VALUE_DESCRIPTION"></textarea>
- </p>
-
<p class="button" id="buttonModify">
<input value="<tmpl_var name="TEXT_SEND">" type="submit" />
</p>
Modified: trunk/vhffs-panel/web/prefs.pl
===================================================================
--- trunk/vhffs-panel/web/prefs.pl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/web/prefs.pl 2007-07-08 20:07:08 UTC (rev 696)
@@ -95,35 +95,16 @@
$template->param( TEXT_SERVERNAME => gettext("Address (Servername)") );
$template->param( VALUE_SERVERNAME => $web->get_servername );
- $template->param( TEXT_CRAWL => gettext("Use crawl (useful for web-search engine)") );
- $template->param( TEXT_DESCRIPTION => gettext("Description of your webarea") );
-
#Show the current description
+ $template->param( TEXT_DESCRIPTION => gettext("Description of your webarea") );
$template->param( VALUE_DESCRIPTION => CGI::escapeHTML( $web->get_description ) );
-
- if( $web->get_crawl == 1 )
- {
- $template->param( YES_CHECKED => "checked" );
- $template->param( NO_CHECKED => "" );
- }
- else
- {
- $template->param( NO_CHECKED => "checked" );
- $template->param( YES_CHECKED => "" );
- }
-
- $template->param( TEXT_YES => gettext("Yes") );
- $template->param( TEXT_NO => gettext("No") );
-
-
$template->param( TEXT_SEND => gettext("Modify") );
+ $template->param( TEXT_ACL_ADMIN => gettext("Admin Rights on this object (ACL)") );
+ $template->param( EXPLAIN_ADMIN_ACL => gettext("You can Manage rights on this service for each user in the VHFFS database. Please read help before manage it.") );
+ $template->param( ADMIN_ACL => gettext("Ok, go to ACL admin") );
+ $template->param( VALUE_OID => $web->get_oid );
- $template->param( TEXT_ACL_ADMIN => gettext("Admin Rights on this object (ACL)") );
- $template->param( EXPLAIN_ADMIN_ACL => gettext("You can Manage rights on this service for each user in the VHFFS database. Please read help before manage it.") );
- $template->param( ADMIN_ACL => gettext("Ok, go to ACL admin") );
- $template->param( VALUE_OID => $web->get_oid );
-
$template->param( TEXT_DELETE_WEB => gettext("Delete this web area") );
$template->param( TEXT_BEFORE_DELETE => gettext("This action is non-reversible. All services associated to this project will be DESTROYED.") );
$template->param( ASK_DELETE_WEB => gettext("Are you SURE you want DELETE this Web Area ?") );
Modified: trunk/vhffs-panel/web/prefs_save.pl
===================================================================
--- trunk/vhffs-panel/web/prefs_save.pl 2007-07-08 17:57:18 UTC (rev 695)
+++ trunk/vhffs-panel/web/prefs_save.pl 2007-07-08 20:07:08 UTC (rev 696)
@@ -62,7 +62,6 @@
my $message;
my $owner = $cgi->param("PROJECT_OWNER");
my $template;
-my $crawl;
my $description;
my $templatedir = $vhffs->get_config->get_templatedir;
@@ -87,9 +86,7 @@
}
else
{
- $crawl = $cgi->param("CRAWL");
$description = $cgi->param("DESCRIPTION");
- $web->set_crawl( $crawl );
$web->set_description( $description );
$web->commit;
$message = gettext( "Modifications applied to your webarea" );