[BACK]Return to lonlocal.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / localize

Diff for /loncom/localize/lonlocal.pm between versions 1.4 and 1.7

version 1.4, 2003/09/17 01:45:14 version 1.7, 2003/09/20 14:16:09
Line 67  sub mt (@) { Line 67  sub mt (@) {
     }      }
 }  }
   
   # ============================================================== What language?
   
   sub current_language {
       return $lh->language_tag();
   }
   
 # ============================================================== Translate hash  # ============================================================== Translate hash
   
 sub texthash {  sub texthash {
Line 76  sub texthash { Line 82  sub texthash {
     }      }
     return %hash;      return %hash;
 }  }
   # ======================================================== Re-route translation
   
   sub clearreroutetrans {
       &reroutetrans();
       $reroute='';
   }
   
 # ======================================================== Re-route translation  # ======================================================== Re-route translation
   
 sub reroutetrans {  sub reroutetrans {
     $ENV{'transreroute'}=1;      $ENV{'transreroute'}=1;
     $reroute='';  
 }  }
   
 # ==================================================== End re-route translation  # ==================================================== End re-route translation
 sub endreroutetrans {  sub endreroutetrans {
     $ENV{'transreroute'}=0;      $ENV{'transreroute'}=0;
Removed from v.1.4  
changed lines
  Added in v.1.7

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>