--- loncom/interface/lonfeedback.pm	2012/01/07 03:01:11	1.327
+++ loncom/interface/lonfeedback.pm	2012/01/07 22:03:01	1.329
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Feedback
 #
-# $Id: lonfeedback.pm,v 1.327 2012/01/07 03:01:11 www Exp $
+# $Id: lonfeedback.pm,v 1.329 2012/01/07 22:03:01 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -787,10 +787,12 @@ sub send_feedback_link {
 sub send_message_link {
     my ($ressymb) = @_;
     my $output = '<span class="LC_message_link">'.
-                 '  <a href="/adm/feedback?sendmessageonly=1&amp;symb='.
-                 &escape($ressymb).'"><img alt="" class="LC_noBorder" src="'.
-                 &Apache::loncommon::lonhttpdurl('/res/adm/pages/feedback.png').
-                 '" border="0" /><span class="LC_menubuttons_inline_text">'.&mt('Send Feedback').'</span></a></span>';
+                 &discussion_link($ressymb,
+                    '<img alt="" class="LC_noBorder" src="'.
+                    &Apache::loncommon::lonhttpdurl('/res/adm/pages/feedback.png').
+                    '" border="0" /><span class="LC_menubuttons_inline_text">'.&mt('Send Feedback').'</span>',
+                    'sendmessageonly').
+                 '</span>';
     return $output;
 }
 
@@ -886,9 +888,9 @@ sub postingform_display {
 <input type="submit" name="anondiscuss" value="$lt{'poan'}" /> <input type="hidden" name="symb" value="$ressymb" />
 <input type="hidden" name="sendit" value="true" />
 <input type="hidden" name="timestamp" value="$now" />
-<br /><a name="newpost"></a>
+<a name="newpost"></a>
 <font size="1">$lt{'note'}</font><br />
-<b>$lt{'title'}:</b>&nbsp;<input type="text" name="subject" value="$subject" size="30" /><br /><br />
+<b>$lt{'title'}:</b>&nbsp;<input type="text" name="subject" value="$subject" size="30" /><br />
 <textarea name="comment" cols="80" rows="14" id="comment" $textareaclass>$comment</textarea>
 ENDDISCUSS
     if ($env{'form.origpage'}) {
@@ -2723,8 +2725,8 @@ sub screen_header {
     unless (($env{'form.replydisc'}) || ($env{'form.editdisc'})) {
 	if (($feedurl=~/^\/res\//) && ($feedurl!~/^\/res\/adm/) && ($env{'user.adv'})) {
 	    $msgoptions= 
-		'<p><label><input type="radio" name="discuss" value="author" /> '.
-		&mt('Feedback to resource author').'</label></p>';
+		'<label><input type="radio" name="discuss" value="author" /> '.
+		&mt('Feedback to resource author').'</label><br />';
 	}
         my %optionhash=();
         foreach my $type ('question','comment','policy') {
@@ -2732,20 +2734,20 @@ sub screen_header {
 	}
 	if (&feedback_available(1)) {
 	    $msgoptions.=
-		'<p><label><input type="radio" name="discuss" value="question" /> '.
-		($optionhash{'question'}?$optionhash{'question'}:&mt('Question about resource content')).'</label></p>';
+		'<label><input type="radio" name="discuss" value="question" /> '.
+		($optionhash{'question'}?$optionhash{'question'}:&mt('Question about resource content')).'</label><br />';
 	}
 	if (&feedback_available(0,1)) {
 	    $msgoptions.=
-		'<p><label><input type="radio" name="discuss" value="course" /> '.
+		'<label><input type="radio" name="discuss" value="course" /> '.
 		($optionhash{'comment'}?$optionhash{'comment'}:$crscontent).
-		'</label></p>';
+		'</label><br />';
 	}
 	if (&feedback_available(0,0,1)) {
 	    $msgoptions.=
-		'<p><label><input type="radio" name="discuss" value="policy" /> '.
+		'<label><input type="radio" name="discuss" value="policy" /> '.
 		($optionhash{'policy'}?$optionhash{'policy'}:$crspolicy).
-		'</label></p>';
+		'</label><br />';
 	}
     }
     if (($env{'request.course.id'}) && (!$env{'form.sendmessageonly'})) {
@@ -4118,6 +4120,8 @@ ENDREDIR
 	  $symb=(split(/\:\:\:/,$env{'form.editdisc'}))[0];
       } elsif ($env{'form.origpage'}) {
 	  $symb=""; 
+      } elsif ($env{'form.sendmessageonly'}) {
+          $symb=(split(/\:\:\:/,$env{'form.sendmessageonly'}))[0];
       } else {
 	  $symb=&Apache::lonnet::symbread($feedurl);
       }