Changeset 22690

Show
Ignore:
Timestamp:
11/04/08 19:44:37 (5 years ago)
Author:
takeshik
Message:

文字列切り出しミスの修正

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/vb2005/Tween/Tween/Tween.vb

    r22689 r22690  
    68676867            Dim name As String = MyList.SelectedItems(0).SubItems(6).Text 
    68686868            name = IO.Path.GetFileNameWithoutExtension(name.Substring(name.LastIndexOf("/"c))) 
    6869             name = name.Substring(0, name.Length - 8) ' "_normal".Length + 1 
     6869            name = name.Substring(0, name.Length - 7) ' "_normal".Length 
    68706870            Me.IconNameToolStripMenuItem.Enabled = True 
    68716871            Me.SaveIconPictureToolStripMenuItem.Enabled = True