--- loncom/lonnet/perl/lonnet.pm	2000/07/24 21:22:35	1.21
+++ loncom/lonnet/perl/lonnet.pm	2000/07/25 15:39:41	1.22
@@ -35,7 +35,7 @@
 # 04/05,05/29,05/31,06/01,
 # 06/05,06/26 Gerd Kortemeyer
 # 06/26 Ben Tyszka
-# 06/30,07/15,07/17,07/18,07/20,07/21,07/22 Gerd Kortemeyer
+# 06/30,07/15,07/17,07/18,07/20,07/21,07/22,07/25 Gerd Kortemeyer
 
 package Apache::lonnet;
 
@@ -625,7 +625,8 @@ sub definerole {
 # ------------------------------------------------------------------ Plain Text
 
 sub plaintext {
-    return $prp{$_};
+    my $short=shift;
+    return $prp{$short};
 }
 
 # ----------------------------------------------------------------- Assign Role
@@ -807,12 +808,9 @@ if ($readit ne 'done') {
     }
 }
 
+
 $readit='done';
 &logthis('<font color=yellow>INFO: Read configuration</font>');
 }
 }
 1;
-
-
-
-