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

[bowersj2]

bowersj2		Fri Jun 20 10:44:06 2003 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  Many places have help for LaTeX editing and we're about to add more, so 
  pull it into a central function.
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.105 loncom/interface/loncommon.pm:1.106
--- loncom/interface/loncommon.pm:1.105	Wed Jun 18 12:22:53 2003
+++ loncom/interface/loncommon.pm	Fri Jun 20 10:44:06 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.105 2003/06/18 16:22:53 www Exp $
+# $Id: loncommon.pm,v 1.106 2003/06/20 14:44:06 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -584,6 +584,26 @@
     if ($text ne '') { $template.='</td></tr></table>' };
     return $template;
 
+}
+
+# This is a quicky function for Latex cheatsheet editing, since it 
+# appears in at least four places
+sub helpLatexCheatsheet {
+    my $other = shift;
+    my $addOther = '';
+    if ($other) {
+	$addOther = Apache::loncommon::help_open_topic($other, shift,
+						       undef, undef, 600) .
+							   '</td><td>';
+    }
+    return '<table><tr><td>'.
+	$addOther .
+	&Apache::loncommon::help_open_topic("Greek_Symbols",'Greek Symbols',
+					    undef,undef,600)
+	.'</td><td>'.
+	&Apache::loncommon::help_open_topic("Other_Symbols",'Other Symbols',
+					    undef,undef,600)
+	.'</td></tr></table>';
 }
 
 =pod