1 --- dosemu-1.0.2/etc/global.conf Tue May 14 15:25:38 2002
2 +++ dosemu-1.0.2/etc/global.conf.new Tue May 14 17:13:19 2002
4 # we have GNU sh-utils < 2.0
5 $xxx = shell("who am i")
7 - if ( ($DOSEMU_STDIN_IS_CONSOLE eq "1")
8 - || ( strlen($xxx) && (strchr($xxx, "(" ) < 0 )))
9 - $BEING_ON = "console"
12 + if (strchr($DOSEMU_OPTIONS,"X") >= 0)
16 + $BEING_ON = $BEING_ON, "_xterm"
19 - if (strstr($xxx, "(:") < 0)
20 - $BEING_ON = "remote"
21 - $REMOTE_HOST = strsplit($xxx, strchr($xxx,"(")+1,99)
22 - $REMOTE_HOST = strdel($REMOTE_HOST, strchr($REMOTE_HOST,")"),99)
26 - if ( (strchr($DOSEMU_OPTIONS,"X") >=0) && ($DISPLAY ne "") )
29 - if (strstr("xterm dtterm", $TERM) >= 0)
30 - $BEING_ON = $BEING_ON, "_xterm"
32 - if (strstr("linux console", $TERM) < 0)
33 - # remote side must be some type of real terminal
34 - $BEING_ON = $BEING_ON, "_terminal"
36 - # remote side is a Linux console
37 - $BEING_ON = $BEING_ON, "_console"
40 + if ($DOSEMU_STDIN_IS_CONSOLE eq "1")
41 + $BEING_ON = "console"
43 + if (strstr("linux console", $TERM) < 0)
44 + $BEING_ON = $BEING_ON, "_terminal"
46 + $BEIGN_ON = $BEIGN_ON, "_console"
51 +# if ( ($DOSEMU_STDIN_IS_CONSOLE eq "1")
52 +# || ( strlen($xxx) && (strchr($xxx, "(" ) < 0 )))
53 +# $BEING_ON = "console"
55 +# if (strstr($xxx, "(:") < 0)
56 +# $BEING_ON = "remote"
57 +# $REMOTE_HOST = strsplit($xxx, strchr($xxx,"(")+1,99)
58 +# $REMOTE_HOST = strdel($REMOTE_HOST, strchr($REMOTE_HOST,")"),99)
62 +# if ( (strchr($DOSEMU_OPTIONS,"X") >=0) && ($DISPLAY ne "") )
65 +# if (strstr("xterm dtterm", $TERM) >= 0)
66 +# $BEING_ON = $BEING_ON, "_xterm"
68 +# if (strstr("linux console", $TERM) < 0)
69 +# # remote side must be some type of real terminal
70 +# $BEING_ON = $BEING_ON, "_terminal"
72 +# # remote side is a Linux console
73 +# $BEING_ON = $BEING_ON, "_console"
78 warn "dosemu running on ", $BEING_ON;
80 $xxx = $_term_char_set