ref: 09f04efe81a26de504943cf6218a409be6c745f6
dir: /apps/bridge/app.rc/
fn bridge_init { if(! ~ $#allowComments 0) { ll_add handlers_body_foot bridge_body_foot if(get_post_args comment_text) { dprint POST COMMNET $"comment_text d=`{date -n} # FIXME Obvious race d=$local_path^'_werc/comments/'^$d/ u=$logged_user if(~ $#logged_user 0) { get_post_args comment_user_name comment_user_password # XXX Should do this too if user not in required group if(! login_user $comment_user_name $comment_user_password) { u=$comment_user_name ':' $comment_user_password d=$d^'_pending' } if not u = $logged_user } umask 002 mkdir -m 775 -p $d echo $u > $d/user echo $comment_text > $d/body } if not dprint SSS $status } } fn bridge_body_foot { template apps/bridge/foot.tpl }