Some cleanings

[devedit.git] / modules / Config / DevEdit.pm

diff --git a/modules/Config/DevEdit.pm b/modules/Config/DevEdit.pm
index 6e74f2dfd528f8a0ca45a79f1fee640c747f8c36..e851ee8bb8da0b50cbaee7a73c48b1bfd4114116 100644 (file)
--- a/modules/Config/DevEdit.pm
+++ b/modules/Config/DevEdit.pm
@@ -9,7 +9,7 @@ package Config::DevEdit;
 # Last modified: 2010-12-24
 #
 # Copyright (C) 1999-2000 Roland Bluethgen, Frank Schoenmann
 # Last modified: 2010-12-24
 #
 # Copyright (C) 1999-2000 Roland Bluethgen, Frank Schoenmann

-# Copyright (C) 2003-2009 Patrick Canterino
+# Copyright (C) 2003-2011 Patrick Canterino

 # All Rights Reserved.
 #
 # This file can be distributed and/or modified under the terms of
 # All Rights Reserved.
 #
 # This file can be distributed and/or modified under the terms of


@@ -85,6 +85,7 @@ sub read_config($)
 
    $config->{'fileroot'}         = $new_conf->{'fileroot'}  if($new_conf->{'fileroot'});
    $config->{'httproot'}         = $new_conf->{'httproot'}  if($new_conf->{'httproot'});
 
    $config->{'fileroot'}         = $new_conf->{'fileroot'}  if($new_conf->{'fileroot'});
    $config->{'httproot'}         = $new_conf->{'httproot'}  if($new_conf->{'httproot'});

+   $config->{'startdir'}         = $new_conf->{'startdir'}  if($new_conf->{'startdir'});

 
    $config->{'forbidden'}        = $new_conf->{'forbidden'} if(defined $new_conf->{'forbidden'});
    $config->{'disable_commands'} = $new_conf->{'disable_commands'} if(defined $new_conf->{'disable_commands'});
 
    $config->{'forbidden'}        = $new_conf->{'forbidden'} if(defined $new_conf->{'forbidden'});
    $config->{'disable_commands'} = $new_conf->{'disable_commands'} if(defined $new_conf->{'disable_commands'});