![[BACK]](/icons/back.gif){kind=icon}
Return to loncommon.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.12, 2001/12/11 13:49:57 | version 1.13, 2001/12/11 13:51:38 |
|---|---|
| Line 64 sub BEGIN { | Line 64 sub BEGIN { |
| next if /^\#/; | next if /^\#/; |
| chomp; | chomp; |
| my ($key,$val)=(split(/\s+/,$_,2)); | my ($key,$val)=(split(/\s+/,$_,2)); |
| $copyright{$key}=$val; | $cprtag{$key}=$val; |
| } | } |
| } | } |
| # ------------------------------------------------------------------ file types | # ------------------------------------------------------------------ file types |