[interchange-cvs] interchange - heins modified code/UserTag/forum.tag

[interchange-core@icdevgroup.org]

User:      heins
Date:      2002-11-04 16:10:53 GMT
Modified:  code/UserTag forum.tag
Log:
* Allow setting of anonymous name.

Revision  Changes    Path
1.3       +1 -1      interchange/code/UserTag/forum.tag


rev 1.3, prev_rev 1.2
Index: forum.tag
===================================================================
RCS file: /var/cvs/interchange/code/UserTag/forum.tag,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -r1.2 -r1.3
--- forum.tag	6 Oct 2002 02:55:50 -0000	1.2
+++ forum.tag	4 Nov 2002 16:10:53 -0000	1.3
@@ -3,7 +3,7 @@
 UserTag forum-userlink Routine <<EOR
 sub {
 	my ($row) = @_;
-	return $row->{name} || 'Anonymous Coward'
+	return $row->{name} || $Variable->{FORUM_ANON_NAME} || 'Anonymous Coward'
 		if $row->{anon} or ! $row->{username};
 	my $realname = tag_data('userdb', 'handle', $row->{username})
 				 || tag_data('userdb', 'fname', $row->{username});