Tatsuki SUGIURA
sugi****@users*****
2006年 7月 13日 (木) 10:12:26 JST
Index: slashjp/Slash/Utility/Display/Display.pm diff -u slashjp/Slash/Utility/Display/Display.pm:1.5 slashjp/Slash/Utility/Display/Display.pm:1.6 --- slashjp/Slash/Utility/Display/Display.pm:1.5 Wed Jul 12 20:41:41 2006 +++ slashjp/Slash/Utility/Display/Display.pm Thu Jul 13 10:12:26 2006 @@ -1,7 +1,7 @@ # This code is a part of Slash, and is released under the GPL. # Copyright 1997-2005 by Open Source Technology Group. See README # and COPYING for more information, or see http://slashcode.com/. -# $Id: Display.pm,v 1.5 2006/07/12 11:41:41 sugi Exp $ +# $Id: Display.pm,v 1.6 2006/07/13 01:12:26 sugi Exp $ package Slash::Utility::Display; @@ -33,7 +33,7 @@ use base 'Exporter'; use vars qw($VERSION @EXPORT); -($VERSION) = ' $Revision: 1.5 $ ' =~ /\$Revision:\s+([^\s]+)/; +($VERSION) = ' $Revision: 1.6 $ ' =~ /\$Revision:\s+([^\s]+)/; @EXPORT = qw( cleanSlashTags createMenu @@ -539,8 +539,8 @@ # we don't NEED to do this ... 404.pl can redirect appropriately if necessary, # but we would need to `mv articles mainpage`, or ln -s, and it just seems better # to me to keep the same URL scheme if possible - my $skinname = $skin->{name} eq 'mainpage' ? 'articles' : $skin->{name}; - $url .= "/$skinname/" . ($story_link->{sid} || $story_ref->{sid}) . ".shtml"; + my $skinname = $skin->{name} eq 'mainpage' ? '/articles' : ''; + $url .= "$skinname/" . ($story_link->{sid} || $story_ref->{sid}) . ".shtml"; # manually add the tid(s), if wanted if ($constants->{tids_in_urls} && $params{tids}) { $url .= '?'; @@ -1723,4 +1723,4 @@ =head1 VERSION -$Id: Display.pm,v 1.5 2006/07/12 11:41:41 sugi Exp $ +$Id: Display.pm,v 1.6 2006/07/13 01:12:26 sugi Exp $
スラド