From 8506c10a38e096e0e27f5f46885513c69d549bca Mon Sep 17 00:00:00 2001
From: "timeless%mac.com" <>
Date: Fri, 21 Dec 2001 07:42:28 +0000
Subject: Bug 98080 ask for an attachment number when no params are given r=dkl
 r=justdave

---
 showattachment.cgi | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'showattachment.cgi')

diff --git a/showattachment.cgi b/showattachment.cgi
index ae81117e5..78143c550 100755
--- a/showattachment.cgi
+++ b/showattachment.cgi
@@ -26,6 +26,19 @@ use strict;
 
 require "CGI.pl";
 
+if (!defined $::FORM{'attach_id'}) {
+    print "Content-type: text/html\n";
+    print "\n";
+    PutHeader("Search by attachment number");  
+    print "<FORM METHOD=GET ACTION=\"showattachment.cgi\">\n";
+    print "You may view a single attachment by entering its id here: \n";
+    print "<INPUT NAME=attach_id>\n";   
+    print "<INPUT TYPE=\"submit\" VALUE=\"Show Me This Attachment\">\n";
+    print "</FORM>\n";
+    PutFooter();
+    exit;
+}
+
 ConnectToDatabase();
 
 quietly_check_login();
-- 
cgit v1.2.3-24-g4f1b