08abc7d698
Also ensures envvars persist into the after-script, and are cleared at the correct time (and only once).
40 lines
1.4 KiB
PowerShell
40 lines
1.4 KiB
PowerShell
# bin/doom.ps1
|
|
|
|
if (!(Get-Command -Erroraction silentlycontinue emacs.exe)) {
|
|
echo "Couldn't find emacs.exe in your PATH."
|
|
exit 1
|
|
}
|
|
|
|
$doom = "$PSScriptRoot/doom"
|
|
$emacs = if ($env:EMACS) { $env:EMACS } else { (Get-Command emacs.exe).Path }
|
|
$oldemacsdir = $env:EMACSDIR
|
|
|
|
try {
|
|
if (-not $env:EMACSDIR) { $env:EMACSDIR = (get-item $PSScriptRoot).parent.FullName; }
|
|
if (-not $env:__DOOMSH) { $env:__DOOMSH = "ps1"; }
|
|
if (-not $env:__DOOMPID) { $env:__DOOMPID = $PID; }
|
|
if (-not $env:__DOOMSTEP) { $env:__DOOMSTEP = 0; }
|
|
if (-not $env:__DOOMGEOM) {
|
|
$cols = (Get-Host).UI.RawUI.WindowSize.Width
|
|
$lines = (Get-Host).UI.RawUI.WindowSize.Height
|
|
$env:__DOOMGEOM = "$cols`x$lines"
|
|
}
|
|
# $env:__DOOMGPIPE = if (-not $env:__DOOMGPIPE) { $env:__DOOMPIPE } else { $env:__DOOMGPIPE }
|
|
# $env:__DOOMPIPE = ""
|
|
|
|
& $emacs -q --no-site-file --batch --load "$doom" -- --no-color $args
|
|
if ($LASTEXITCODE -eq 254) {
|
|
& pwsh "$($env:temp)\doom.$($env:__DOOMPID).$($env:__DOOMSTEP).ps1" $PSCommandPath $args
|
|
$exit = $LASTEXITCODE
|
|
}
|
|
exit $exit
|
|
} finally {
|
|
# Only clear the env at top-level
|
|
if ($env:__DOOMSTEP -eq 0) {
|
|
$env:EMACSDIR = $oldemacsdir
|
|
Remove-Item Env:\__DOOMSH
|
|
Remove-Item Env:\__DOOMPID
|
|
Remove-Item Env:\__DOOMSTEP
|
|
Remove-Item Env:\__DOOMGEOM
|
|
}
|
|
}
|