X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2FModules%2FUserInfo.pl;h=b26b34ee5239630dad689c86e0f19d39256d8919;hb=3936a3e1255582305fc4200485b71fa692e66bd3;hp=e35373b04900216dcb8ca53199f63b073a13fcb6;hpb=8b54ff5060a6605e169acc0694cb00b89ed22cab;p=infobot.git

diff --git a/src/Modules/UserInfo.pl b/src/Modules/UserInfo.pl
index e35373b..b26b34e 100644
--- a/src/Modules/UserInfo.pl
+++ b/src/Modules/UserInfo.pl
@@ -9,13 +9,13 @@
 
 use strict;
 
-my $orderOfInfo = "RN,J,C,W,D";
+my $orderOfInfo = 'RN,J,C,W,D';
 my %infoDesc = (
-	"RN"	=> "Real Name",
-	"J"	=> "Occupation",
-	"C"	=> "Contact",
-	"W"	=> "URL",
-	"D"	=> "Description",
+	'RN'	=> 'Real Name',
+	'J'	=> 'Occupation',
+	'C'	=> 'Contact',
+	'W'	=> 'URL',
+	'D'	=> 'Description',
 );
 
 sub UserInfo2Hash {
@@ -61,7 +61,7 @@ sub UserInfoGet {
     }
 
     my $result;
-    if ($result = &getFactoid($query." info")) {
+    if ($result = &getFactoid($query.' info')) {
 	# good.
     } else { # bad.
 	&performReply("No User Information on \002$query\002");
@@ -160,7 +160,7 @@ sub UserInfoSet {
 	$userInfo{$info} = $what;
     }
 
-    &setFactInfo($who." info", "factoid_value", &Hash2UserInfo(%userInfo));
+    &setFactInfo($who.' info', 'factoid_value', &Hash2UserInfo(%userInfo));
     if ($new) {
 	&DEBUG("UIS: locking '$who info'.");
 	&DEBUG("UIS: nuh => '$nuh'.");