From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <zsh-workers-return-6594-mason-zsh=primenet.com.au@sunsite.auc.dk>
Received: (qmail 7501 invoked from network); 11 Jun 1999 11:22:26 -0000
Received: from sunsite.auc.dk (130.225.51.30)
  by ns1.primenet.com.au with SMTP; 11 Jun 1999 11:22:26 -0000
Received: (qmail 22351 invoked by alias); 11 Jun 1999 11:22:18 -0000
Mailing-List: contact zsh-workers-help@sunsite.auc.dk; run by ezmlm
Precedence: bulk
X-No-Archive: yes
X-Seq: 6594
Received: (qmail 22329 invoked from network); 11 Jun 1999 11:22:12 -0000
Date: 8 Jun 1999 13:58:24 +0900
Message-ID: <19990608045824.8245.sada@rr.iij4u.or.jp>
To: zsh-workers@math.gatech.edu
Cc: sada@rr.iij4u.or.jp
Subject: zsh 3.1.5 su problem
From: sada@rr.iij4u.or.jp (SADA Kenji)
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
X-Mailer: mnews [version 1.21] 1997-12/23(Tue)

Hello.

I heared that zsh-3.1.5 failures su function because
it emulates `sh' by first letter `s' of `su'.

How about a patch below.

Thanks !

*** options.c.orig      Mon Jun  7 11:03:16 1999
--- options.c   Mon Jun  7 11:32:17 1999
***************
*** 432,448 ****
  void
  emulate(const char *zsh_name, int fully)
  {
!     char ch = *zsh_name;

!     if (ch == 'r')
!       ch = zsh_name[1];

      /* Work out the new emulation mode */
!     if (ch == 'c')
        emulation = EMULATE_CSH;
!     else if (ch == 'k')
        emulation = EMULATE_KSH;
!     else if (ch == 's' || ch == 'b')
        emulation = EMULATE_SH;
      else
        emulation = EMULATE_ZSH;
--- 432,448 ----
  void
  emulate(const char *zsh_name, int fully)
  {
!     char *name = zsh_name;

!     if (*name == 'r')
!       name++;

      /* Work out the new emulation mode */
!     if (!strcmp (name, "csh"))
        emulation = EMULATE_CSH;
!     else if (!strcmp (name, "ksh"))
        emulation = EMULATE_KSH;
!     else if (!strcmp (name, "sh") || !strcmp (name, "bash"))
        emulation = EMULATE_SH;
      else
        emulation = EMULATE_ZSH;