--- loncom/interface/lonfeedback.pm	2001/02/13 18:18:40	1.9
+++ loncom/interface/lonfeedback.pm	2001/07/25 16:08:38	1.10
@@ -13,6 +13,7 @@
 # 2/9 Guy Albertelli
 # 2/10 Gerd Kortemeyer
 # 2/13 Guy Albertelli
+# 7/25 Gerd Kortemeyer
 
 package Apache::lonfeedback;
 
@@ -31,26 +32,31 @@ sub mail_screen {
 <script>
     function gosubmit() {
         var rec=0;
-        if (document.mailform.elements.author!=undefined) {
+        if (typeof(document.mailform.elements.author!=undefined)) {
           if (document.mailform.elements.author.checked) {
              rec=1;
           } 
         }
-        if (document.mailform.elements.question!=undefined) {
+        if (typeof(document.mailform.elements.question!=undefined)) {
           if (document.mailform.elements.question.checked) {
              rec=1;
           } 
         }
-        if (document.mailform.elements.course!=undefined) {
+        if (typeof(document.mailform.elements.course!=undefined)) {
           if (document.mailform.elements.course.checked) {
              rec=1;
           } 
         }
-        if (document.mailform.elements.policy!=undefined) {
+        if (typeof(document.mailform.elements.policy!=undefined)) {
           if (document.mailform.elements.policy.checked) {
              rec=1;
           } 
         }
+        if (typeof(document.mailform.elements.discuss!=undefined)) {
+          if (document.mailform.elements.discuss.checked) {
+             rec=1;
+          } 
+        }
 
         if (rec) {
 	    document.mailform.submit();
@@ -157,6 +163,10 @@ sub screen_header {
       '<br><input type=checkbox name=policy> '.
 	'Question/Comment/Feedback about course policy';
   }
+  if ($ENV{'request.course.id'}) {
+    $options.='<br><input type=checkbox name=discuss> '.
+	'<b>Contribution to course discussion of resource</b>';
+  }
   return $options;
 }