[MKDoc-commit] [1.6] fixed uninitialised value warning when audience category was undef

[bruno at mkdoc.demon.co.uk]

Log Message:
-----------
[1.6] fixed uninitialised value warning when audience category was undef

Tags:
----
mkdoc-1-6

Modified Files:
--------------
    mkd/flo/Record:
        Audience.pm

-------------- next part --------------
Index: Audience.pm
===================================================================
RCS file: /var/spool/cvs/mkd/flo/Record/Audience.pm,v
retrieving revision 1.7.2.5
retrieving revision 1.7.2.6
diff -Lflo/Record/Audience.pm -Lflo/Record/Audience.pm -u -r1.7.2.5 -r1.7.2.6
--- flo/Record/Audience.pm
+++ flo/Record/Audience.pm
@@ -318,7 +318,7 @@
 {
     my $self = shift;
     my $label = $self->{Label};
-    return undef unless $label =~ /:/;
+    return '' unless $label =~ /:/;
     $label =~ s/ *:.*//;
     return $label;
 }