From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <zsh-workers-return-6578-mason-zsh=primenet.com.au@sunsite.auc.dk>
Received: (qmail 23244 invoked from network); 10 Jun 1999 15:01:59 -0000
Received: from sunsite.auc.dk (130.225.51.30)
  by ns1.primenet.com.au with SMTP; 10 Jun 1999 15:01:59 -0000
Received: (qmail 20338 invoked by alias); 10 Jun 1999 15:01:41 -0000
Mailing-List: contact zsh-workers-help@sunsite.auc.dk; run by ezmlm
Precedence: bulk
X-No-Archive: yes
X-Seq: 6578
Received: (qmail 20318 invoked from network); 10 Jun 1999 15:01:38 -0000
Date: 11 Jun 1999 00:01:34 +0900
Message-ID: <19990610150134.9646.sada@rr.iij4u.or.jp>
To: zsh-workers@sunsite.auc.dk
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;