--- loncom/interface/londocs.pm	2002/10/09 20:16:12	1.24
+++ loncom/interface/londocs.pm	2002/10/10 17:17:11	1.25
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Documents
 #
-# $Id: londocs.pm,v 1.24 2002/10/09 20:16:12 www Exp $
+# $Id: londocs.pm,v 1.25 2002/10/10 17:17:11 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -327,6 +327,14 @@ ENDNEWSCRIPT
   $r->print('</head>'.
             &Apache::loncommon::bodytag('Course Documents','',$events));
   unless ($showdoc) {
+    if ($allowed) {
+       $r->print(<<ENDCOURSEVERIFY);
+<form name="courseverify">
+<input type="submit" name="verify" value="Verify Content" />
+<input type="submit" name="versions" value="Check Resource Versions" />
+</form>
+ENDCOURSEVERIFY
+    }
 # --------------------------------------------------------- Standard documents
     $r->print('<table>');
     if (($standard) && ($allowed) && (!$forcesupplement)) {