os/doc
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Record the posting host.

Browse source 
Automatically add a "New!" icon.
This commit is contained in:
John Fieber 1996-10-06 14:14:27 +00:00
parent cef3fa741e
commit b2bae4bc6a
Notes: svn2git 2020-12-08 03:00:23 +00:00 
svn path=/www/; revision=582
2 changed files with 16 additions and 18 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
data/cgi/gallery.cgi
View file

@ -3,7 +3,7 @@
# A CGI form processor for FreeBSD Gallery submissions # A CGI form processor for FreeBSD Gallery submissions
# #
# John Fieber <jfieber@indiana.edu> # John Fieber <jfieber@indiana.edu>
# August 9 1996 # $Id: gallery.cgi,v 1.3 1996-10-06 14:14:27 jfieber Exp $
################################################################## ##################################################################
$curator = "jfieber@indiana.edu"; $curator = "jfieber@indiana.edu";
@ -13,14 +13,14 @@ $subject = "Another gallery submission...";
require 'cgi-lib.pl'; require 'cgi-lib.pl';
&ReadParse; &ReadParse;
#$d_date = "$Date: 1996-10-01 19:46:14 $"; $hsty_date = "\$Date: 1996-10-06 14:14:27 $";
#$h_base = ".."; #$h_base = "..";
#$d_author = " #$d_author = "
require 'cgi-style.pl'; require 'cgi-style.pl';
# Construct the gallery entry in HTML form # Construct the gallery entry in HTML form
$entry = "<li><a href=\"$in{'url'}\"><strong>$in{'organization'}</strong> " . $entry = "<li><a href=\"$in{'url'}\"><strong>$in{'organization'}</strong> " .
"-- $in{'description'}</a></li>"; "-- $in{'description'}</a> &i.new;</li>";
# Try and figure out where the person came from so we can provide # Try and figure out where the person came from so we can provide
# links back to the correct place. # links back to the correct place.
@ -83,7 +83,7 @@ If anything is wrong, use your
browser's <em>back</em> button and correct it. browser's <em>back</em> button and correct it.
If everything is okay, press the <em>submit</em> button If everything is okay, press the <em>submit</em> button
below.</p> below.</p>
<p>Contact person: $in{'contact'}</p> <p>Contact person: <strong>$in{'contact'}</strong></p>
<hr><h2>$in{'category'}</h2> <hr><h2>$in{'category'}</h2>
<ul> <ul>
$entry $entry
@ -104,8 +104,8 @@ $entry
# And this is where we thank them for submitting an entry. # And this is where we thank them for submitting an entry.
$formc = &html_header("Thank You!") . $formc = &html_header("Thank You!") .
"<P>Please allow a few days for your entry to be added "<P>Thank you for your entry! Please allow a few days for your
to the Gallery.</p> entry to be added to the Gallery.</p>
<p>$return</p> <p>$return</p>
" . &html_footer(); " . &html_footer();
@ -118,9 +118,8 @@ elsif ($in{'action'} eq "submit") {
# close(STDOUT); # close(STDOUT);
open(M, "| mail -s \"$subject\" $curator"); open(M, "| mail -s \"$subject\" $curator");
print M "$in{'contact'} submitted the following to be added under\n"; print M "\"$in{'category'}\" gallery entry:\n\n";
print M "\"$in{'category'}\" in the gallery:\n\n"; print M "<!-- from $in{'contact'} ($ENV{'REMOTE_HOST'}) on $timestamp -->\n";
print M "<!-- from $in{'contact'} on $timestamp -->\n";
print M "$entry\n"; print M "$entry\n";
close(M); close(M);
} }

17
en/cgi/gallery.cgi
View file

@ -3,7 +3,7 @@
# A CGI form processor for FreeBSD Gallery submissions # A CGI form processor for FreeBSD Gallery submissions
# #
# John Fieber <jfieber@indiana.edu> # John Fieber <jfieber@indiana.edu>
# August 9 1996 # $Id: gallery.cgi,v 1.3 1996-10-06 14:14:27 jfieber Exp $
################################################################## ##################################################################
$curator = "jfieber@indiana.edu"; $curator = "jfieber@indiana.edu";
@ -13,14 +13,14 @@ $subject = "Another gallery submission...";
require 'cgi-lib.pl'; require 'cgi-lib.pl';
&ReadParse; &ReadParse;
#$d_date = "$Date: 1996-10-01 19:46:14 $"; $hsty_date = "\$Date: 1996-10-06 14:14:27 $";
#$h_base = ".."; #$h_base = "..";
#$d_author = " #$d_author = "
require 'cgi-style.pl'; require 'cgi-style.pl';
# Construct the gallery entry in HTML form # Construct the gallery entry in HTML form
$entry = "<li><a href=\"$in{'url'}\"><strong>$in{'organization'}</strong> " . $entry = "<li><a href=\"$in{'url'}\"><strong>$in{'organization'}</strong> " .
"-- $in{'description'}</a></li>"; "-- $in{'description'}</a> &i.new;</li>";
# Try and figure out where the person came from so we can provide # Try and figure out where the person came from so we can provide
# links back to the correct place. # links back to the correct place.
@ -83,7 +83,7 @@ If anything is wrong, use your
browser's <em>back</em> button and correct it. browser's <em>back</em> button and correct it.
If everything is okay, press the <em>submit</em> button If everything is okay, press the <em>submit</em> button
below.</p> below.</p>
<p>Contact person: $in{'contact'}</p> <p>Contact person: <strong>$in{'contact'}</strong></p>
<hr><h2>$in{'category'}</h2> <hr><h2>$in{'category'}</h2>
<ul> <ul>
$entry $entry
@ -104,8 +104,8 @@ $entry
# And this is where we thank them for submitting an entry. # And this is where we thank them for submitting an entry.
$formc = &html_header("Thank You!") . $formc = &html_header("Thank You!") .
"<P>Please allow a few days for your entry to be added "<P>Thank you for your entry! Please allow a few days for your
to the Gallery.</p> entry to be added to the Gallery.</p>
<p>$return</p> <p>$return</p>
" . &html_footer(); " . &html_footer();
@ -118,9 +118,8 @@ elsif ($in{'action'} eq "submit") {
# close(STDOUT); # close(STDOUT);
open(M, "| mail -s \"$subject\" $curator"); open(M, "| mail -s \"$subject\" $curator");
print M "$in{'contact'} submitted the following to be added under\n"; print M "\"$in{'category'}\" gallery entry:\n\n";
print M "\"$in{'category'}\" in the gallery:\n\n"; print M "<!-- from $in{'contact'} ($ENV{'REMOTE_HOST'}) on $timestamp -->\n";
print M "<!-- from $in{'contact'} on $timestamp -->\n";
print M "$entry\n"; print M "$entry\n";
close(M); close(M);
} }