From 6a3324d9032c9e9add5b58f602550f544616bb7b Mon Sep 17 00:00:00 2001 From: Rick Hennigan Date: Tue, 17 Dec 2024 19:40:32 -0500 Subject: [PATCH] Bugfix: Handle script command line arguments when using kernel directly --- Scripts/BuildPaclet.wls | 2 +- Scripts/Common.wl | 1 + 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/Scripts/BuildPaclet.wls b/Scripts/BuildPaclet.wls index eb2afdc2..7cc42c4a 100755 --- a/Scripts/BuildPaclet.wls +++ b/Scripts/BuildPaclet.wls @@ -27,7 +27,7 @@ result = checkResult @ cicd`BuildPaclet[ (* ::**************************************************************************************************************:: *) (* ::Subsection::Closed:: *) (*Install*) -If[ MemberQ[ $ScriptCommandLine, "-i"|"--install"|"--install=true" ], +If[ MemberQ[ $scriptCommandLine, "-i"|"--install"|"--install=true" ], archive = cFile @ result[ "PacletArchive" ]; cicd`ConsoleNotice @ SequenceForm[ "Installing paclet file: ", archive ]; installed = cicd`ScriptConfirmBy[ PacletInstall[ archive, ForceVersionInstall -> True ], PacletObjectQ ]; diff --git a/Scripts/Common.wl b/Scripts/Common.wl index 814a69c4..30ed7781 100644 --- a/Scripts/Common.wl +++ b/Scripts/Common.wl @@ -104,6 +104,7 @@ messageString[ ___ ] := "-- Message text not found --"; (* ::**************************************************************************************************************:: *) (* ::Section::Closed:: *) (*Definitions*) +$scriptCommandLine := Replace[ $ScriptCommandLine, { } :> $CommandLine ]; $$ws = WhitespaceCharacter...; $$id = "\"" ~~ Except[ "\"" ].. ~~ "\"";