Index: openacs-4/packages/attachments/www/attach-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/attachments/www/attach-2.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/attachments/www/attach-2.tcl	11 Dec 2003 21:39:57 -0000	1.4
+++ openacs-4/packages/attachments/www/attach-2.tcl	7 Aug 2017 23:48:04 -0000	1.5
@@ -7,9 +7,9 @@
     @cvs-id $Id$
 
 } -query {
-    {object_id:notnull}
-    {item_id:notnull}
-    {return_url:notnull}
+    {object_id:naturalnum,notnull,notnull}
+    {item_id:naturalnum,notnull,notnull}
+    {return_url:localurl,notnull}
 }
 
 # Perms
@@ -24,3 +24,9 @@
 }
 
 ad_returnredirect $return_url
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: