diff --git a/OpenProblemLibrary/Michigan/Chap2Sec3/Q31.pg b/OpenProblemLibrary/Michigan/Chap2Sec3/Q31.pg
index b256028dcc..df88ac969e 100644
--- a/OpenProblemLibrary/Michigan/Chap2Sec3/Q31.pg
+++ b/OpenProblemLibrary/Michigan/Chap2Sec3/Q31.pg
@@ -142,7 +142,7 @@ derivative yourself.
 $PAR
 $BCENTER
 \{ image( insertGraph( $gr ), tex_size=>350, height=>250, width=>250,
-	  extra_html_tags=>'alt="graph of a function f(x)"' ) \}
+	  alt=>"Graph of a function" ) \}
 $ECENTER
 $PAR
 Which of the following graphs is the derivative of \(f(x)\)?
@@ -155,28 +155,28 @@ $BCENTER
 \{ begintable(4) \}
 \{ row( "${BBOLD}1.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{0} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"'),
+	      height=>$H, width=>$W, alt=>"graph"),
 	"${BBOLD}2.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{1} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"'),
+	      height=>$H, width=>$W, alt=>"graph"),
 	"${BBOLD}3.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{2} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"'),
+	      height=>$H, width=>$W, alt=>"graph"),
 	"${BBOLD}4.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{3} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"') ) \}
+	      height=>$H, width=>$W, alt=>"graph") ) \}
 \{ row( "${BBOLD}5.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{4} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"'),
+	      height=>$H, width=>$W, alt=>"graph"),
 	"${BBOLD}6.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{5} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"'),
+	      height=>$H, width=>$W, alt=>"graph"),
 	"${BBOLD}7.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{6} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"'),
+	      height=>$H, width=>$W, alt=>"graph"),
 	"${BBOLD}8.$EBOLD" .
 	image(insertGraph( $graphs[ $shuffle->{7} ] ), tex_size=>$T,
-	      height=>$H, width=>$W, extra_html_tags=>'alt="graph"') ) \}
+	      height=>$H, width=>$W, alt=>"graph") ) \}
 \{ endtable() \}
 $ECENTER
 
@@ -186,8 +186,7 @@ Context()->normalStrings;
 ANS( $pop->cmp() );
 
 Context()->texStrings;
-SOLUTION(EV3(<<'END_SOLUTION'));
-$PAR SOLUTION $PAR
+BEGIN_SOLUTION
 
 Because the derivative gives the slope of the original function at
 each point \(x\), we know that the derivative is negative where
@@ -196,7 +195,7 @@ this to \(f(x)\), we see that the derivative must be
 $PAR
 $BCENTER
 \{ image(insertGraph( $graphs[$shuffle->{$zero}] ), tex_size=>$T,
-	 height=>200, width=>200, extra_html_tags=>'alt="graph"') \}
+	 height=>200, width=>200, alt=>"graph") \}
 $ECENTER
 $PAR
 which is answer \{ $pop->correct_ans()\}.