Help for this page

Select Code to Download


  1. or download this
    [%
    my $html = $VARS->{freenodelet}
...
    $html= htmlcode( 'expandfreenodelet','', $html );
    return $html;
%]
  2. or download this
    my( $html, $just )= @_;
my $AUTHOR= getNodeById( $NODE->{author_user} );
...
}seg;

return $html;
  3. or download this
    my $want= ($q->param("at"))[-1];
my $html= $VARS->{freenodelet};
...
# Everything::printLog( "Expanding -$want- in $USER->{title}'s freenod
+elet: $update updates$/" );
$VARS->{freenodelet}= $html
    if  $update;