From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <zsh-workers-request@math.gatech.edu>
Received: (qmail 7240 invoked from network); 29 Oct 1997 17:13:41 -0000
Received: from math.gatech.edu (list@130.207.146.50)
  by ns1.primenet.com.au with SMTP; 29 Oct 1997 17:13:41 -0000
Received: (from list@localhost)
	by math.gatech.edu (8.8.5/8.8.5) id MAA04129;
	Wed, 29 Oct 1997 12:08:34 -0500 (EST)
Resent-Date: Wed, 29 Oct 1997 12:08:11 -0500 (EST)
From: Andrew Main <zefram@tao.co.uk>
Message-Id: <199710291708.RAA01142@taos.demon.co.uk>
Subject: Re: Perl replacement challenge
To: ramos@ih4ess.ih.lucent.com
Date: Wed, 29 Oct 1997 17:08:34 +0000 (GMT)
Cc: zsh-users@math.gatech.edu
In-Reply-To: <199710291619.KAA11548@ihnns581.ih.lucent.com> from "ramos@ih4ess.ih.lucent.com" at Oct 29, 97 10:19:56 am
X-Loop: zefram@tao.co.uk
X-Headers: in preparation
X-Mailer: ELM [version 2.4 PL25]
MIME-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Resent-Message-ID: <"-qDNa1.0.X_.wrsLq"@math>
Resent-From: zsh-users@math.gatech.edu
X-Mailing-List: <zsh-users@math.gatech.edu> archive/latest/1117
X-Loop: zsh-users@math.gatech.edu
X-Loop: zsh-workers@math.gatech.edu
Precedence: list
Resent-Sender: zsh-workers-request@math.gatech.edu

ramos@ih4ess.ih.lucent.com wrote:
>	# Use "kshdot some_ksh_script" instead of ". some_ksh_script"
>
>	kshdot() { source =(ksh -c ". $* 1>&2; senv") }

How about

function kshdot {
  emulate ksh
  setopt localoptions
  . $@
}

-zefram