--- loncom/interface/londocs.pm 2016/01/26 14:30:25 1.598 +++ loncom/interface/londocs.pm 2016/03/18 21:59:42 1.599 @@ -1,7 +1,7 @@ # The LearningOnline Network # Documents # -# $Id: londocs.pm,v 1.598 2016/01/26 14:30:25 raeburn Exp $ +# $Id: londocs.pm,v 1.599 2016/03/18 21:59:42 damieng Exp $ # # Copyright Michigan State University Board of Trustees # @@ -685,7 +685,7 @@ sub group_import { } else { $fname =~ s/\W/_/g; } - if (length($fname > 15)) { + if (length($fname) > 15) { $fname = substr($fname,0,14); } my $initialtext = &mt('Replace with your own content.');