Elsnet
 


ELSNET-list archive

#!/usr/bin/ksh
# presentevent.cgi -- 
# version 0

#. ~elswww/.env

# present all events from xevents, now
# with headers displayed


echo Content-type:text/html
echo

case $0 in
  *nonevent*) # jump over message in deleted items
              JUMP=yes ;;
           *) # do not jump in active messages
              JUMP=no ;;
esac

nawk -v JUMP=$JUMP ' BEGIN { print ""
             }
       NR<8  { # insert messageto link in email line
               if (index($3,"@")>0)
               { sub("@","_(on)_",$3)
                 $3="	"$3""
               }
               sub("","",$0)
             }
       NR==8 { print "

" if (JUMP=="yes") { print "

Sorry, this item is no longer available

" exit } } /mailto:.*@/ { gsub("mailto:","/messageto.html?",$0) gsub("@","_(on)_",$0) } { print $0 } ' $QUERY_STRING
 

[print/pda] [no frame] [navigation table] [navigation frame]     Page generated 25-02-2009 by Steven Krauwer Disclaimer / Contact ELSNET