[LON-CAPA-cvs] cvs: loncom /interface lonrss.pm

raeburn raeburn at source.lon-capa.org
Sat May 25 17:50:19 EDT 2013


raeburn		Sat May 25 21:50:19 2013 EDT

  Modified files:              
    /loncom/interface	lonrss.pm 
  Log:
  - xhtml
  
  
Index: loncom/interface/lonrss.pm
diff -u loncom/interface/lonrss.pm:1.51 loncom/interface/lonrss.pm:1.52
--- loncom/interface/lonrss.pm:1.51	Mon May  6 16:15:59 2013
+++ loncom/interface/lonrss.pm	Sat May 25 21:50:19 2013
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # RSS Feeder
 #
-# $Id: lonrss.pm,v 1.51 2013/05/06 16:15:59 raeburn Exp $
+# $Id: lonrss.pm,v 1.52 2013/05/25 21:50:19 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -411,7 +411,7 @@
 # Add a new feed
         if (($html) && ($edit)) {
 	    $r->print('<h4>' . &mt('New RSS Feed or Blog'). '</h4>');
-	    $r->print('<form method="post" name="makenewfeed">');
+	    $r->print('<form method="post" name="makenewfeed" action="">');
             $r->print(&mt('Name').": <input type='text' size='40' name='namenewblog' />");
 	    $r->print('<input type="submit" value="'.&mt('New Feed').'" />');
 	    $r->print('</form>');
@@ -513,7 +513,7 @@
 		      ($html?'<hr /><h3>':'<title>').
 		      &mt('LON-CAPA Feed "[_1]" for [_2]',$displayfeedname,$name).
 		      ($displayoption eq 'hidden'?' ('.&mt('Hidden').')':'').
-		      ($html?'</h3>'.($edit?'<form method="post" name="lonhomework" enctype="multipart/form-data"><br />'.
+		      ($html?'</h3>'.($edit?'<form method="post" name="lonhomework" enctype="multipart/form-data" action=""><br />'.
 				      &mt('Name of this Feed').
 				      ': <input type="text" size="50" name="newblogname" value="'.
 				      $displayfeedname.'" />':'').'<ul>':'</title>'));
@@ -614,9 +614,10 @@
 			      ($displayoption eq 'hidden'?'<input type="submit" name="advertisethisblog" value="'.&mt('Advertise this Feed').'" />':
 			       '<input type="submit" name="hidethisblog" value="'.&mt('Hide this Feed').'" />'));
 		}
+                $r->print('</form>');
 	    }
 	} # was a real display feedname
-	$r->print(($html?'</form>'.&Apache::loncommon::end_page():'</channel></rss>'."\n"));
+	$r->print(($html?&Apache::loncommon::end_page():'</channel></rss>'."\n"));
     } # a real user
     return OK;
 } # end handler




More information about the LON-CAPA-cvs mailing list