From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <zsh-workers-return-35690-mason-zsh=primenet.com.au@zsh.org>
Received: (qmail 28789 invoked by alias); 5 Jul 2015 12:48:01 -0000
Mailing-List: contact zsh-workers-help@zsh.org; run by ezmlm
Precedence: bulk
X-No-Archive: yes
List-Id: Zsh Workers List <zsh-workers.zsh.org>
List-Post: <mailto:zsh-workers@zsh.org>
List-Help: <mailto:zsh-workers-help@zsh.org>
X-Seq: 35690
Received: (qmail 20709 invoked from network); 5 Jul 2015 12:47:57 -0000
X-Spam-Checker-Version: SpamAssassin 3.4.0 (2014-02-07) on f.primenet.com.au
X-Spam-Level: 
X-Spam-Status: No, score=-2.0 required=5.0 tests=BAYES_00,DKIM_SIGNED,
	DKIM_VALID,DKIM_VALID_AU,FREEMAIL_FROM,RCVD_IN_DNSWL_NONE,RCVD_IN_MSPIKE_H3,
	RCVD_IN_MSPIKE_WL autolearn=ham autolearn_force=no version=3.4.0
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=yahoo.com; s=s2048; t=1436100097; bh=YFXaxqm2zQ4gtxJtp1b3irFc7xvnuq0MLH6QOY7Xaa0=; h=Date:From:Reply-To:To:In-Reply-To:References:Subject:From:Subject; b=h83CEMi8Yqe2BiHmlceMVpcHRfxVvMyDjsab1Za88KCzL+zLFgIWkPnJHL9Yx1OdDYrCQ4Xx9pS+/U0gVh35xc2AWXMhvBURdkEOKvFshNWgDgXE/UoCvD/0+IChrFAhtOF/Y4mbxOYt4utWGIdFtkLG3SsLjucww6P85686XVQ3yURkCKfq69N6U71m1wYepodn0skdYQgQaQfShv4uIygj9yymkvCCXREQzIO6z+9Ujit2mlTK17hLPqixQy2BQ+gwnidgBRuRP7SvG7dTQsg1DffEdtFHE+QkYYAzLql7pkZlf+D5Ys8KMbQok9IXvpBEVn2GyQrKR3DXPDLAXA==
X-Yahoo-Newman-Property: ymail-3
X-Yahoo-Newman-Id: 681817.90455.bm@omp1055.mail.bf1.yahoo.com
X-YMail-OSG: UlgXom8VM1lOrrTH4lboonPHrwGYomjsC5b74U3MSEfFkWRK6vbr8pYBqhdeJ9N
 an0.kzrVg9O_HH2VIrP4Ra0yBhIdwHZzkNDtbvn82YDRmPWJV1Y.p5SMzsftXSOZHdvjSYjX_41s
 XKeeimBTRoz7YzLLXWLuy0G5uR0O.om88KZ.SKK3mp_zglk.bSbJXfAIs1YJn5YEJq5B61lpR6HG
 b9dSjHkhZF1lkClv1Ov5JeKq36QDF9MYJvFV91FkIdwdXxqttulBDXQgWJisWWQbEncuJZdSt8Zo
 1x993rzxkWNXQSw5618cecYLKCdSl1OerQ0Moquc5zN0EDjOttHUuiQMIueV2doJgHLxLp7lkyS1
 rLp55E.x4bwc09IjgmUz4s4zKKqtA_hBvX_qafi4OkAgGTkIYdSqHc.N3zqLTF1Zw83c2f4gyjmL
 YqA.4voW_hHN9V2eVDfEef5gv.zSbovwqE3gmUxC_P2EZYLv3fAX8GTHGP_ENSbwOh8YSpMQjXb0
 T7pvEeCB69c3a
Date: Sun, 5 Jul 2015 12:41:36 +0000 (UTC)
From: John <da_audiophile@yahoo.com>
Reply-To: John <da_audiophile@yahoo.com>
To: Bart Schaefer <schaefer@brasslantern.com>, 
	"zsh-workers@zsh.org" <zsh-workers@zsh.org>
Message-ID: <1629103316.2775887.1436100096886.JavaMail.yahoo@mail.yahoo.com>
In-Reply-To: <150628140435.ZM1792@torch.brasslantern.com>
References: <150628140435.ZM1792@torch.brasslantern.com>
Subject: Re: perl 5.22 causes warnings when zsh calls it
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 7bit

Thanks, this works. Will it be incorporated into the next release of zsh?


----- Original Message -----
> Aside:  Damn, it's hard to get curly braces into a pattern in a parameter
> substitution inside double quotes.
> 
> 
> diff --git a/Functions/Prompts/prompt_adam1_setup 
> b/Functions/Prompts/prompt_adam1_setup
> index 034641f..aca0e59 100644
> --- a/Functions/Prompts/prompt_adam1_setup
> +++ b/Functions/Prompts/prompt_adam1_setup
> @@ -14,8 +14,6 @@ This theme works best with a dark background.
> Recommended fonts for this theme: nexus or vga or similar.  If you
> don't have any of these, then specify the `plain' option to use 7-bit
> replacements for the 8-bit characters.
> -
> -And you probably thought adam1 was overkill.
> EOF
> }
> 
> @@ -27,8 +25,9 @@ prompt_adam1_setup () {
>    base_prompt="%K{$prompt_adam1_color1}%n@%m%k "
>    post_prompt="%b%f%k"
> 
> -  base_prompt_no_color=$(echo "$base_prompt" | perl -pe 
> "s/%(K{.*?}|k)//g")
> -  post_prompt_no_color=$(echo "$post_prompt" | perl -pe 
> "s/%(K{.*?}|k)//g")
> +  setopt localoptions extendedglob
> +  
> base_prompt_no_color="${base_prompt//(%K{[^\\\}]#\}|%k)/}"
> +  
> post_prompt_no_color="${post_prompt//(%K{[^\\\}]#\}|%k)/}"
> 
>    add-zsh-hook precmd prompt_adam1_precmd
> 
> }
>