source: trunk/debathena/debathena/xsession/debian/xsession.tcsh @ 23853

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 *
RevLine 
[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
9set initdir=/usr/lib/init
10
11setenv XSESSION $$
12
13if (-r /etc/.login) source /etc/.login
14if (-r /etc/.cshrc) source /etc/.cshrc
15if (-r /etc/csh.login) source /etc/csh.login
16if (-r /etc/csh.cshrc) source /etc/csh.cshrc
17
18if (-r ~/.cshrc) then
19  source ~/.cshrc
20else
21  if (-r ${initdir}/cshrc) source ${initdir}/cshrc
22endif
23
[23447]24if (! $?skip_initial_xterm) then
[23475]25  setenv ATHENA_INITIAL_X_TERMINAL
[23447]26endif
27
[23027]28if (! $?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
38endif
39
40if (! $?skip_lert) then
41  ($initdir/displaylert &)
42endif
43
[23853]44if ((-r ~/.startup.X) && (! $?NOCALLS)) then
[23027]45  (source ~/.startup.X &)
46endif
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]50if ( "$DEBATHENA_HOME_TYPE" == "afs" && $?XCONSOLE ) then
[23841]51    kill $XCONSOLE
[23851]52    unsetenv XCONSOLE
[23841]53endif
54
[23027]55# Proceed with the session command, which has been passed as arguments.
56exec $argv:q
Note: See TracBrowser for help on using the repository browser.