zsh-workers
 help / color / mirror / code / Atom feed
From: Peter Stephenson <p.w.stephenson@ntlworld.com>
To: zsh-workers@zsh.org
Subject: Re: Pasting UTF-8 characters with bracketed-paste-magic seems broken in 5.1
Date: Thu, 10 Sep 2015 20:35:27 +0100	[thread overview]
Message-ID: <20150910203527.260abe86@ntlworld.com> (raw)
In-Reply-To: <20150910195713.340861cb@ntlworld.com>

On Thu, 10 Sep 2015 19:57:13 +0100
Peter Stephenson <p.w.stephenson@ntlworld.com> wrote:
> Now should be possible to do more in shell code...

This seems to be getting somewhere, but possibly needs more expert
examination...

I suppose I'd better leave making a build till tomorrow.

pws

diff --git a/Functions/Zle/bracketed-paste-magic b/Functions/Zle/bracketed-paste-magic
index 49f4b66..464c6b3 100644
--- a/Functions/Zle/bracketed-paste-magic
+++ b/Functions/Zle/bracketed-paste-magic
@@ -164,17 +164,25 @@ bracketed-paste-magic() {
 	integer bpm_limit=$UNDO_LIMIT_NO bpm_undo=$UNDO_CHANGE_NO
 	UNDO_LIMIT_NO=$UNDO_CHANGE_NO
 
+	local mbchar
+	integer ismb
 	while [[ -n $PASTED ]] && zle .read-command; do
-	    PASTED=${PASTED#$KEYS}
-	    if [[ $KEYS = ${(~j:|:)${(b)bpm_inactive}} ]]; then
-		zle .self-insert-unmeta
+	    mbchar=$KEYS
+	    ismb=0
+	    while [[ $mbchar = [[:INCOMPLETE:]]* ]] && zle .read-command; do
+		mbchar+=$KEYS
+		ismb=1
+	    done
+	    PASTED=${PASTED#$mbchar}
+	    if [[ ismb -ne 0 || $mbchar = ${(~j:|:)${(b)bpm_inactive}} ]]; then
+		LBUFFER+=$mbchar
 	    else
 		case $REPLY in
 		    (${~bpm_active}) function () {
 			emulate -L $bpm_emulate; set -$bpm_opts
 			zle $REPLY
 		    };;
-		    (*) zle .self-insert-unmeta;;
+		    (*) LBUFFER+=$mbchar;
 		esac
 	    fi
 	done


  reply	other threads:[~2015-09-10 19:35 UTC|newest]

Thread overview: 23+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2015-09-06 15:57 Axel Beckert
2015-09-10 11:17 ` Axel Beckert
2015-09-10 15:26   ` Yuri D'Elia
2015-09-10 14:39 ` Bart Schaefer
2015-09-10 14:57   ` Axel Beckert
2015-09-10 15:45     ` Bart Schaefer
2015-09-10 16:07       ` Peter Stephenson
2015-09-10 16:16         ` Bart Schaefer
2015-09-10 16:28           ` Peter Stephenson
2015-09-10 18:57             ` Peter Stephenson
2015-09-10 19:35               ` Peter Stephenson [this message]
2015-09-10 23:24                 ` Bart Schaefer
2015-09-11  8:10                   ` Peter Stephenson
2015-09-11  9:42                     ` Axel Beckert
2015-09-11 15:33                     ` Bart Schaefer
2015-09-11 17:41                       ` Peter Stephenson
2015-09-11 19:22                         ` Bart Schaefer
2015-09-11 19:49                           ` Axel Beckert
2015-09-11 20:04                             ` Axel Beckert
2015-09-11 21:53               ` Daniel Shahaf
2015-09-10 19:20             ` Bart Schaefer
2015-09-10 19:29               ` Bart Schaefer
2015-09-10 19:53                 ` Peter Stephenson

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=20150910203527.260abe86@ntlworld.com \
    --to=p.w.stephenson@ntlworld.com \
    --cc=zsh-workers@zsh.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
Code repositories for project(s) associated with this public inbox

	https://git.vuxu.org/mirror/zsh/

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).