[WWcvs] pg: One last change to make hardcopy work properly.

[dpvc v. a. <we...@ma...>]

Log Message:
-----------
One last change to make hardcopy work properly.

Modified Files:
--------------
    pg/macros:
        contextCurrency.pl

Revision Data
-------------
Index: contextCurrency.pl
===================================================================
RCS file: /webwork/cvs/system/pg/macros/contextCurrency.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -Lmacros/contextCurrency.pl -Lmacros/contextCurrency.pl -u -r1.9 -r1.10
--- macros/contextCurrency.pl
+++ macros/contextCurrency.pl
@@ -198,7 +198,8 @@
   $context->{_currency}{symbol} = $symbol;
   $context->operators->remove($symbol) if $context->operators->get($symbol);
   $context->operators->add(
-    $symbol => {precedence => 10, associativity => $associativity, type => "unary", string => $symbol,
+    $symbol => {precedence => 10, associativity => $associativity, type => "unary",
+		string => ($main::displayMode eq 'TeX' ? Currency::quoteTeX($symbol) : $symbol),
                 TeX => Currency::quoteTeX($symbol), class => 'Currency::UOP::currency'},
   );
   $context->{parser}{Number} = "Currency::Number";