diff --git a/stepmania/src/smpackage/smpackage.cpp b/stepmania/src/smpackage/smpackage.cpp
index 06f4d8f2d3..a3c82c6033 100644
--- a/stepmania/src/smpackage/smpackage.cpp
+++ b/stepmania/src/smpackage/smpackage.cpp
@@ -54,6 +54,11 @@ BOOL CSmpackageApp::InitInstance()
 	LPSTR pLastBackslash = strrchr(szFullAppPath, '\\');
 	*pLastBackslash = '\0';	// terminate the string
 
+	/* If "Program" is the top-level directory, strip it off. */
+	pLastBackslash = strrchr( szFullAppPath, '\\' );
+	if( pLastBackslash && !stricmp(pLastBackslash, "\\Program") )
+		*pLastBackslash = '\0';
+
 	SetCurrentDirectory(szFullAppPath);
 
 	if( DoesFileExist("Songs") )	// this is a SM or DWI program directory