bug#35480: insert-wide-parentheses

[Andreas Schwab]

On Apr 30 2019, Juri Linkov <juri@linkov.net> wrote:

> OK, this adds all Unicode pairs to the default:
>
> diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el
> index d10d5f0d10..f73dbb269d 100644
> --- a/lisp/emacs-lisp/lisp.el
> +++ b/lisp/emacs-lisp/lisp.el
> @@ -646,7 +646,13 @@ narrow-to-defun
>        (narrow-to-region beg end))))
>  
>  (defvar insert-pair-alist
> -  '((?\( ?\)) (?\[ ?\]) (?\{ ?\}) (?\< ?\>) (?\" ?\") (?\' ?\') (?\` ?\'))
> +  (append '((?\< ?\>) (?\" ?\") (?\' ?\') (?\` ?\'))
> +          (let (alist)
> +            (map-char-table
> +             (lambda (open close)
> +               (when (< open close) (push (list open close) alist)))
> +             (unicode-property-table-internal 'paired-bracket))
> +            (nreverse alist)))

Loading /home/abuild/rpmbuild/BUILD/emacs-27.0.50/lisp/emacs-lisp/lisp.el 
(source)...
Wrong type argument: char-table-p, nil
make[2]: *** [Makefile:808: bootstrap-emacs.pdmp] Error 255

Andreas.

-- 
Andreas Schwab, schwab@linux-m68k.org
GPG Key fingerprint = 7578 EB47 D4E5 4D69 2510  2552 DF73 E780 A9DA AEC1
"And now for something completely different."