|
From: <Mik...@su...> - 2007-05-23 16:23:56
|
Hi:
I just installed version 4.2 (stable) on ECS (current version of OS/2) =
and would like to submit these install instructions:
- download jedit42install.jar.
- open a command window.
- change to the directory where jedit42install.jar resides.
- type "java -jar jedit42install.jar" and press enter.
- follow instructions as presented by the installer.
Additionally, I would like to submit this command file as the one deliv=
ered with the install did not work (very minor changes).
** Start of File **
/* MAINTAINERS: Robert Henschel (os...@gm...)
* Christoph vogt (ch...@gm...)
* Gili Tzabari (ju...@bb...)
* PLATFORM: OS/2, eCS
*
* Used to run JEdit 3.1
*/
rc =3D QueryJavaVersion()
if (rc =3D -1) then
do
say "java.exe cannot be found"
return -1;
end
if (rc =3D -2) then
say "Unexpected response to JAVA -VERSION. Assuming newest version=
is being used."
arguments =3D "-settings=3D%HOME%\.jedit -server=3D%HOME%\.jedit\ser=
ver"
jedit_dir =3D GetExecPath()
if (iMajor =3D 1 & iMid <=3D 1) then
'java -classpath %classpath%;'jedit_dir'\jedit.jar org.gjt.sp.je=
dit.jEdit 'arguments
else
'java -jar 'jedit_dir'\jedit.jar 'arguments
return 0
/*
* Java version detector.
* Assumes java -version return quoted ("") version number.
* Written by os2bird on #netlabs
*
* Returns -1 on no java or failed to execute
* -2 on invalid java version string.
* version number.
*/
QueryJavaVersion: procedure expose iMajor iMid iMinor
cQueued =3D queued();
'@echo off'
'java -version 2>&1 | rxqueue /LIFO'
i =3D queued();
do while i > cQueued
pull sStr
if (pos("JAVA VERSION ", sStr) > 0) | (pos("JAVA.EXE VERSION ", =
sStr) > 0) then
do
do while(queued() > 0)
pull sStrIgnore; /* flush input stream */
end
parse var sStr sStuff '"'iMajor'.'iMid'.'iMinor'"'
iMinor =3D SUBSTR(iMinor,1,1)
if (iMinor <> '') then
return iMajor*100 + iMid * 10 + iMinor;
else
return -2
end
i =3D i - 1;
end
return -1;
/*
* Returns the path of the script being executed.
*/
GetExecPath: procedure
parse source result
parse var result 'OS/2 ' dummy result /* Get =
full path of script */
result=3Dfilespec("drive", result) || filespec("path", result) /* st=
rip away filename */
result=3Dsubstr(result, 1, length(result)-1) /* re=
move backslash */
return result
** End of File **
Thanks.....Mike.
-----------------------------------------------------------------------=
----
This e-mail message (including attachments, if any) is intended for the=
use
of the individual or entity to which it is addressed and may contain
information that is privileged, proprietary , confidential and exempt f=
rom
disclosure. If you are not the intended recipient, you are notified th=
at
any dissemination, distribution or copying of this communication is
strictly prohibited. If you have received this communication in error,=
please notify the sender and erase this e-mail message immediately.
-----------------------------------------------------------------------=
----
Le pr=E9sent message =E9lectronique (y compris les pi=E8ces qui y sont =
annex=E9es,
le cas =E9ch=E9ant) s'adresse au destinataire indiqu=E9 et peut conteni=
r des
renseignements de caract=E8re priv=E9 ou confidentiel. Si vous n'=EAtes=
pas le
destinataire de ce document, nous vous signalons qu'il est strictement
interdit de le diffuser, de le distribuer ou de le reproduire. Si ce
message vous a =E9t=E9 transmis par erreur, veuillez en informer l'exp=E9=
diteur
et le supprimer imm=E9diatement.
-----------------------------------------------------------------------=
----=
|