iqbalrifai
/
Aegisub
mirror of https://github.com/odrling/Aegisub
1
0
Fork 0
Code Issues Releases Wiki Activity

Fixes to Perl support on Windows 

Originally committed to SVN as r1760.
This commit is contained in:
Rodrigo Braz Monteiro 2008-01-18 03:10:16 +00:00
parent 7a6f2973c5
commit 864c446318
3 changed files with 26 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
aegisub/auto4_perl.cpp
View File

@ -76,6 +76,14 @@ namespace Automation4 {
// Script engine properties
engine_name = _T("Perl");
filename_pattern = _T("*") _T(PERL_SCRIPT_EXTENSION);
// On Visual Studio, first check if the dll is available
// This needs to be done because it is set to delay loading of this dll
#ifdef __VISUALC__
HMODULE dll = LoadLibrary(_T("perl510.dll"));
if (!dll) return;
FreeLibrary(dll);
#endif
// Perl interpreter initialization (ONE FOR ALL THE SCRIPTS)
char** env = NULL;

2
build/aegisub_vs2005/aegisub_vs2005.vcproj
View File

@ -70,6 +70,7 @@
LinkIncremental="2"
AdditionalLibraryDirectories="../../lib"
GenerateManifest="true"
DelayLoadDLLs="perl510.dll"
GenerateDebugInformation="true"
SubSystem="2"
TargetMachine="1"
@ -152,6 +153,7 @@
LinkIncremental="1"
AdditionalLibraryDirectories="../../lib"
GenerateManifest="true"
DelayLoadDLLs="perl510.dll"
GenerateDebugInformation="true"
SubSystem="2"
OptimizeReferences="2"

18
installer/aegisub2.iss
View File

@ -33,7 +33,7 @@
;
#define MyAppName "Aegisub"
#define MyAppVerName "Aegisub 2.00 alpha r1755"
#define MyAppVerName "Aegisub 2.00 alpha r1760"
#define MyAppPublisher "Aegisub Team"
#define MyAppURL "http://aegisub.net/"
#define MyAppExeName "Aegisub.exe"
@ -42,6 +42,7 @@
; Only intended for testing.
#define IncludeSpeller 1
#define IncludeThesaurus 1
#define IncludePerl 1
[Setup]
AppName={#MyAppName}
@ -67,7 +68,7 @@ PrivilegesRequired=poweruser
DisableProgramGroupPage=true
UsePreviousGroup=false
AlwaysShowComponentsList=true
AppVersion=2.00 alpha r1755
AppVersion=2.00 alpha r1760
AppID={{24BC8B57-716C-444F-B46B-A3349B9164C5}
UninstallDisplayIcon={app}\Aegisub.exe
@ -111,6 +112,15 @@ DestDir: {app}\automation\demos; Source: ..\automation\tests\kara-templater-reti
DestDir: {app}\automation\autoload; Source: ..\automation\demos\macro-1-edgeblur.lua; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/lua/samples; Attribs: readonly
DestDir: {app}\automation\autoload; Source: ..\automation\demos\macro-2-mkfullwitdh.lua; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/lua/samples; Attribs: readonly
DestDir: {app}\automation\autoload; Source: ..\automation\autoload\cleantags-autoload.lua; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/lua/samples; Attribs: readonly
; perl
#if IncludePerl != 0
DestDir: {app}\automation\docs; Source: ..\automation\v4-docs\perl-api.txt; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/perl; Attribs: readonly
DestDir: {app}\automation\include; Source: ..\automation\include\Auto4Utils.pm; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/perl; Attribs: readonly
DestDir: {app}\automation\include\Aegisub; Source: ..\automation\include\Aegisub\PerlConsole.pm; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/perl; Attribs: readonly
DestDir: {app}\automation\include\Aegisub; Source: ..\automation\include\Aegisub\Script.pm; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/perl; Attribs: readonly
DestDir: {app}\automation\autoload; Source: ..\automation\demos\macro-1p-edgeblur.pl; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/perl/samples; Attribs: readonly
DestDir: {app}\automation\demos; Source: ..\automation\demos\perl-console.pl; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/perl/samples; Attribs: readonly
#endif
; auto3
DestDir: {app}\automation\include; Source: ..\automation\include\utils.auto3; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/auto3; Attribs: readonly
DestDir: {app}\automation\include; Source: ..\automation\include\karaskel.auto3; Flags: ignoreversion overwritereadonly uninsremovereadonly; Components: auto/auto3; Attribs: readonly
@ -185,6 +195,10 @@ Name: codec/vsfilter; Description: VSFilter 2.38-aegisub; Types: compact full cu
Name: auto; Description: Automation 4 scripting support; Types: compact full
Name: auto/lua; Description: Lua; Types: compact full; Flags: checkablealone; Languages:
Name: auto/lua/samples; Description: Lua sample scripts; Types: full
#if IncludePerl != 0
Name: auto/perl; Description: Perl (requires a Perl distribution); Types: compact full; Flags: checkablealone; Languages:
Name: auto/perl/samples; Description: Perl sample scripts; Types: compact full; Flags: checkablealone; Languages:
#endif
Name: auto/auto3; Description: Automation 3 backwards compatibility; Types: full
Name: help; Description: Help files (not written yet); Flags: fixed
Name: i18n; Description: Languages; Types: full custom compact; Flags: fixed