X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=cgi%2Fsets.cgi;h=5dd8a8de27272c85b56d6f4e2443477b3636c220;hb=e2c2c02d1f29bfd86165a3e4bcebbe6feeafa823;hp=4cb21db4a0a55cbf313210ec9bc48a7fc8779870;hpb=7a94315986b86da53b932fc23ef04d6395715e15;p=technostate.git diff --git a/cgi/sets.cgi b/cgi/sets.cgi index 4cb21db..5dd8a8d 100755 --- a/cgi/sets.cgi +++ b/cgi/sets.cgi @@ -1,5 +1,5 @@ #!/usr/bin/perl -Tw -# $Id: sets.cgi,v 1.6 1999-04-23 06:34:07 ivan Exp $ +# $Id: sets.cgi,v 1.7 1999-07-18 05:08:29 ivan Exp $ # Copyright (c) 1999 Ivan Kohler. All rights reserved. # This program is free software; you can redistribute it and/or modify it under # the same terms as perl itself @@ -43,10 +43,8 @@ unless ( $cgi->param('magic') ) { #first time through print $cgi->start_table, $cgi->tr( - ( map { - $cgi->th($_) - } @columns - ), $cgi->th('People'); + ( map { $cgi->th($_) } @columns ), + $cgi->th('People') ) ;