--- _svn_Dakar/DEVELOP/lib/TWiki/UI/Register.pm 2005-10-18 00:10:50.000000000 +0200
+++ Dakar/lib/TWiki/UI/Register.pm 2005-10-28 03:56:07.000000000 +0200
@@ -791,8 +791,17 @@
ASSERT($data->{WikiName}) if DEBUG;
+ # The user homepage needs not be write protected if TWiki does no
+ # password management. In that case we'll disable the ALLOWTOPICCHANGE
+ # setting when copying the user template to the actual home page.
+ my $writeableUserHomepage = $TWiki::cfg{PasswordManager} eq 'none' ? '#' : '';
+
# TODO - there should be some way of overwriting meta without
# blatting the content.
- $text ||= "%SPLIT%\n\t* %KEY%: %VALUE%%SPLIT%\n\t* Set ALLOWTOPICCHANGE = %WIKIUSERNAME%\n";
+ $text ||= ( "%SPLIT%\n"
+ . " * %KEY%: %VALUE%%SPLIT%\n"
+ . " * ${writeableUserHomepage}Set ALLOWTOPICCHANGE = %WIKIUSERNAME%\n"
+ );
+ $text =~ s/%WRITEABLEUSERHOMEPAGE%/$writeableUserHomepage/g;
my ( $before, $repeat, $after ) = split( /%SPLIT%/, $text );
--- _svn_Dakar/DEVELOP/data/TWiki/NewUserTemplate.txt 2005-10-18 00:12:48.000000000 +0200
+++ Dakar/data/TWiki/NewUserTemplate.txt 2005-10-28 03:38:23.000000000 +0200
@@ -20,5 +20,5 @@
* Set EDITBOXSTYLE = width: 99%
* %MAKETEXT{"Write protect your home page: (set it to your [_1])" args="%MAINWEB%.WikiName"}%
- * Set ALLOWTOPICCHANGE = %WIKIUSERNAME%
+ * %WRITEABLEUSERHOMEPAGE%Set ALLOWTOPICCHANGE = %WIKIUSERNAME%
__%MAKETEXT{"Related Topics:"}%__