Tadashi Okoshi
slash****@users*****
2006年 6月 5日 (月) 14:37:30 JST
Index: affelio/lib/AffelioApp.pm
diff -u affelio/lib/AffelioApp.pm:1.28 affelio/lib/AffelioApp.pm:1.29
--- affelio/lib/AffelioApp.pm:1.28 Sun Jun 4 18:11:55 2006
+++ affelio/lib/AffelioApp.pm Mon Jun 5 14:37:30 2006
@@ -14,7 +14,7 @@
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
-# $Id: AffelioApp.pm,v 1.28 2006/06/04 09:11:55 slash5234 Exp $
+# $Id: AffelioApp.pm,v 1.29 2006/06/05 05:37:30 slash5234 Exp $
package AffelioApp;
{
@@ -61,7 +61,7 @@
$install_name = $ENV{SCRIPT_URI};
$install_name =~ s|([^:])//|$1/|g; #Translate "//" to "/"
$install_name =~ s|\Q$my_af_url\E||g; #Distill later than "apps/"
- $install_name =~ s|(.*)/(.*)|$1|; #Distill only app dir name.
+ $install_name =~ s|(.*?)/(.*)|$1|; #Distill only app dir name.
}else{
$install_name = $app__fs_root;
$install_name =~ s|/(.*)/||g;