--- loncom/interface/lonnavmaps.pm 2004/09/13 20:06:57 1.288 +++ loncom/interface/lonnavmaps.pm 2004/09/14 18:05:30 1.289 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Navigate Maps Handler # -# $Id: lonnavmaps.pm,v 1.288 2004/09/13 20:06:57 albertel Exp $ +# $Id: lonnavmaps.pm,v 1.289 2004/09/14 18:05:30 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1685,7 +1685,12 @@ END return &$oldFilterFunc($res); }; @resources=$navmap->retrieveResources(undef,$filterFunc); - @resources= sort {lc($a->compTitle) cmp lc($b->compTitle)} @resources; + @resources= sort { + my ($atitle,$btitle) = (lc($a->compTitle),lc($b->compTitle)); + $atitle=~s/^\s*//; + $btitle=~s/^\s*//; + return $atitle cmp $btitle + } @resources; } elsif ($args->{'sort'} eq 'duedate') { @resources=$navmap->retrieveResources(undef, sub { shift->is_problem(); });