Bug fix for hrn check; allow dashes.

protogeni/lib/GeniCredential.pm.in

@@ -249,7 +249,7 @@ sub CreateFromSigned($$;$)
 	print STDERR "Invalid target_uuid in credential\n";
 	return undef;
     }
-    if (!($target_certificate->hrn() =~ /^[\w\.]+$/)) {
+    if (!($target_certificate->hrn() =~ /^[-\w\.]+$/)) {
 	print STDERR "Invalid hrn in credential\n";
 	return undef;
     }
@@ -268,7 +268,7 @@ sub CreateFromSigned($$;$)
 	print STDERR "Invalid target_uuid in credential\n";
 	return undef;
     }
-    if (!($owner_certificate->hrn() =~ /^[\w\.]+$/)) {
+    if (!($owner_certificate->hrn() =~ /^[-\w\.]+$/)) {
 	print STDERR "Invalid hrn in credential\n";
 	return undef;
     }