[LON-CAPA-cvs] cvs: loncom /homework lonhomework.pm

albertel lon-capa-cvs@mail.lon-capa.org
Tue, 11 Apr 2006 21:08:29 -0000


albertel		Tue Apr 11 17:08:29 2006 EDT

  Modified files:              
    /loncom/homework	lonhomework.pm 
  Log:
  - eliminating old dead code
  
  
Index: loncom/homework/lonhomework.pm
diff -u loncom/homework/lonhomework.pm:1.238 loncom/homework/lonhomework.pm:1.239
--- loncom/homework/lonhomework.pm:1.238	Tue Apr 11 17:05:54 2006
+++ loncom/homework/lonhomework.pm	Tue Apr 11 17:08:29 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Homework handler
 #
-# $Id: lonhomework.pm,v 1.238 2006/04/11 21:05:54 albertel Exp $
+# $Id: lonhomework.pm,v 1.239 2006/04/11 21:08:29 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -941,25 +941,6 @@
     return '';
 }
 
-sub view_or_edit_menu {
-    my ($request) = @_;
-    my $url=&HTML::Entities::encode($request->uri,'<>&"');
-    my %lt=&Apache::lonlocal::texthash( 'would' => 'Would you like to',
-		      'view' => 'View',
-		      'Edit' => 'edit',
-		      'or' => 'or',
-		      'the problem' => 'the problem');
-    $request->print(<<EDITMENU);
-<body bgcolor="#FFFFFF">
-<form action="$url" method="POST">
-$lt{'would'} <input type="submit" name="problemmode" accesskey="v" value="&lt{'view'}">
-&lt{'or'} <input type="submit" name="problemmode" accesskey="e" value="&lt{'Edit'}">
-&lt{'the problem'}.
-</form>
-</body>
-EDITMENU
-}
-
 sub handler {
     #my $t0 = [&gettimeofday()];
     my $request=$_[0];
@@ -997,7 +978,6 @@
 						    ['problemmode']);
 	    if (!(defined $env{'form.problemmode'})) {
 		#first visit to problem in construction space
-		#&view_or_edit_menu($request);
 		$env{'form.problemmode'}='View';
 		&renderpage($request,$file);
 	    } elsif ($env{'form.problemmode'} eq &mt('EditXML') ||