Posted by Juha Valtonen on
URL: https://forum.survo.fi/OPEN-tp223.html


Hei

viimeisen päivityksen kohdalla olisiko OPEN-sukroon tullut pieni bugi.
Esimerkiksi GS-PDF ei toimi - syynä näyttäisi olevan se, että
OPEN-sukrossa heti alkupuolella:

*tutload <Survo>\S\open
/ Open a file with a suitable program depending on the file type.
/ K.Vehkalahti 3.3.2003 (modifications for Muste by RS & KV 2012)
/ ---------------------------------------------------------------------
*{tempo -1}{init}{save stack}{disp off}{W1=OPEN}{call SUR-SAVE}{break on}{del stack}{load stack}
- if W1 '=' ? then goto Help
- if W1 '=' (empty) then goto Help
/ Assume that the line is of the form "/OPEN <file> / perhaps comments"
/ (obs: <file> may include the path and one or several spaces!)
*{line start}{erase}{erase}{print W1}{line start}

**** edellisestä rivistä puuttuu {save line W1} eli se pitäisi olla
{line start}{save line W1}{erase}{erase}{print W1}{line start}

niin sitten näyttäisi toimivan....

:JVa