summaryrefslogtreecommitdiff
path: root/startx.cmd
diff options
context:
space:
mode:
authorMikhail Gusarov <dottedmag@dottedmag.net>2010-04-25 03:21:43 +0700
committerAlan Coopersmith <alan.coopersmith@oracle.com>2010-04-26 08:48:51 -0700
commite4548fe62d58d7cb891dc142c400c22031d471fb (patch)
treef03859dcd39fbe1de8b137b3252c937566cd43a5 /startx.cmd
parentc82295911409c611c097ef2e1269a78d54314304 (diff)
Remove OS/2 leftovers
Signed-off-by: Mikhail Gusarov <dottedmag@dottedmag.net> Signed-off-by: Alan Coopersmith <alan.coopersmith@oracle.com>
Diffstat (limited to 'startx.cmd')
-rw-r--r--startx.cmd80
1 files changed, 0 insertions, 80 deletions
diff --git a/startx.cmd b/startx.cmd
deleted file mode 100644
index 950ab9d..0000000
--- a/startx.cmd
+++ /dev/null
@@ -1,80 +0,0 @@
-/* OS/2 REXX */
-/*
- * This is just a sample implementation of a slightly less primitive
- * interface than xinit. It looks for user xinitrc.cmd and xservrc.cmd
- * files, then system xinitrc.cmd and xservrc.cmd files, else lets xinit choose
- * its default. The system xinitrc should probably do things like check
- * for Xresources files and merge them in, startup up a window manager,
- * and pop a clock and serveral xterms.
- *
- * Site administrators are STRONGLY urged to write nicer versions.
- */
-'@echo off'
-ADDRESS CMD
-env = 'OS2ENVIRONMENT'
-x11root = VALUE('X11ROOT',,env)
-IF x11root = '' THEN DO
- SAY "The environment variable X11ROOT is not set. X/OS2 won't run without it."
- EXIT
-END
-
-home = VALUE('HOME',,env)
-IF home = '' THEN home = x11root
-os_shell = VALUE('X11SHELL',,env)
-IF os_shell = '' THEN os_shell = VALUE('SHELL',,env)
-IF os_shell = '' THEN os_shell = VALUE('OS2_SHELL',,env)
-IF os_shell = '' THEN DO
- SAY "There is no command interpreter in OS2_SHELL ???"
- EXIT
-END
-
-userclientrc = home'\xinitrc.cmd'
-userserverrc = home'\xservrc.cmd'
-sysclientrc = x11root'\usr\X11R6\lib\X11\xinit\xinitrc.cmd'
-sysserverrc = x11root'\usr\X11R6\lib\X11\xinit\xservrc.cmd'
-clientargs = ''
-serverargs = ''
-
-IF exists(userclientrc) THEN
- clientargs = userclientrc
-ELSE
-IF exists(sysclientrc) THEN
- clientargs = sysclientrc
-
-IF exists(userserverrc) THEN
- serverargs = userserverrc
-ELSE
-IF exists(sysserverrc) THEN
- serverargs = sysserverrc
-
-whoseargs = "client"
-PARSE ARG all
-
-DO i=1 TO WORDS(all)
- cur = WORD(all,i)
- IF \(FILESPEC('DRIVE',cur) = '') THEN DO
- IF whoseargs = "client" THEN
- clientargs = cur
- ELSE
- serverargs = cur
- END
- ELSE
- IF cur = "--" THEN
- whoseargs = "server"
- ELSE
- IF whoseargs = "client" THEN
- clientargs = clientargs' 'cur
- ELSE
- serverargs = serverargs' 'cur
-END
-
-xinit = x11root'\usr\X11R6\bin\xinit'
-xinit os_shell' /c 'clientargs' -- 'serverargs
-
-RETURN
-
-exists:
- IF STREAM(arg(1), 'C', 'QUERY EXISTS') = '' THEN
- RETURN 0
- ELSE
- RETURN 1