| Revision 23853,
1.4 KB
checked in by broder, 15 years ago
(diff) |
|
Only delete the .dmrc file if it's set to our nocalls session.
Also add some extra parentheses to xsession.tcsh, just in case they're
needed.
|
-
Property svn:executable set to
*
|
| Rev | Line | |
|---|
| [23681] | 1 | #!/usr/bin/tcsh -f |
|---|
| [23027] | 2 | |
|---|
| 3 | # This is the Athena xsession wrapper for tcsh users. Its job is to: |
|---|
| 4 | # 1. Set the XSESSION environment variable. |
|---|
| 5 | # 2. Process the user's dotfiles including .environment. |
|---|
| 6 | # 3. Run standard startup programs if the user has not opted out. |
|---|
| 7 | # 4. Run the user's .startup.X. |
|---|
| 8 | |
|---|
| 9 | set initdir=/usr/lib/init |
|---|
| 10 | |
|---|
| 11 | setenv XSESSION $$ |
|---|
| 12 | |
|---|
| 13 | if (-r /etc/.login) source /etc/.login |
|---|
| 14 | if (-r /etc/.cshrc) source /etc/.cshrc |
|---|
| 15 | if (-r /etc/csh.login) source /etc/csh.login |
|---|
| 16 | if (-r /etc/csh.cshrc) source /etc/csh.cshrc |
|---|
| 17 | |
|---|
| 18 | if (-r ~/.cshrc) then |
|---|
| 19 | source ~/.cshrc |
|---|
| 20 | else |
|---|
| 21 | if (-r ${initdir}/cshrc) source ${initdir}/cshrc |
|---|
| 22 | endif |
|---|
| 23 | |
|---|
| [23447] | 24 | if (! $?skip_initial_xterm) then |
|---|
| [23475] | 25 | setenv ATHENA_INITIAL_X_TERMINAL |
|---|
| [23447] | 26 | endif |
|---|
| 27 | |
|---|
| [23027] | 28 | if (! $?skip_x_startup) then |
|---|
| 29 | if (! $?ZEPHYR_CLIENT) setenv ZEPHYR_CLIENT zwgc |
|---|
| 30 | $ZEPHYR_CLIENT |
|---|
| 31 | ($initdir/displaymotd &) |
|---|
| 32 | if (! $?skip_quotawarn) then |
|---|
| 33 | ($initdir/quotawarn &) # Display warning dialogs if near quota |
|---|
| 34 | endif |
|---|
| 35 | if (! $?skip_authwatch) then |
|---|
| 36 | (authwatch &) |
|---|
| 37 | endif |
|---|
| 38 | endif |
|---|
| 39 | |
|---|
| 40 | if (! $?skip_lert) then |
|---|
| 41 | ($initdir/displaylert &) |
|---|
| 42 | endif |
|---|
| 43 | |
|---|
| [23853] | 44 | if ((-r ~/.startup.X) && (! $?NOCALLS)) then |
|---|
| [23027] | 45 | (source ~/.startup.X &) |
|---|
| 46 | endif |
|---|
| 47 | |
|---|
| [23841] | 48 | # If we got this far, then there were no errors that the user /really/ |
|---|
| [23849] | 49 | # needed to see, so get rid of the ugly xterm |
|---|
| [23851] | 50 | if ( "$DEBATHENA_HOME_TYPE" == "afs" && $?XCONSOLE ) then |
|---|
| [23841] | 51 | kill $XCONSOLE |
|---|
| [23851] | 52 | unsetenv XCONSOLE |
|---|
| [23841] | 53 | endif |
|---|
| 54 | |
|---|
| [23027] | 55 | # Proceed with the session command, which has been passed as arguments. |
|---|
| 56 | exec $argv:q |
|---|
Note: See
TracBrowser
for help on using the repository browser.
