insert pair doesn't work with *, $ and %

insert pair doesn't work with *, $ and %

[Dieter Wilhelm]

Hi

For a special mode I'd like to have key bindings duplicating various
characters like e. g.

(global-set-key "\C-c{" 'insert-pair)

this does work as expected (I'm getting a pair of {} and the point is
within the pair).  But I can't get the analogous with *, $ and % to
run, I'm just getting one of these characters back and not a pair.
What am I missing here?

-- 
    Best wishes

    H. Dieter Wilhelm
    Darmstadt, Germany

Re: insert pair doesn't work with *, $ and %

[Andreas Seltenreich]

Dieter Wilhelm writes:

> For a special mode I'd like to have key bindings duplicating various
> characters like e. g.
>
> (global-set-key "\C-c{" 'insert-pair)
>
> this does work as expected (I'm getting a pair of {} and the point is
> within the pair).  But I can't get the analogous with *, $ and % to
> run, I'm just getting one of these characters back and not a pair.
> What am I missing here?

My first thought was that the function might look up the pairs in the
current buffer's syntax table, similar to the commands for
sexp-movement, but in fact it has it's own alist:

,----[ C-h f insert-pair RET ]
| If arguments open and close are nil, the character pair is found
| from the variable `insert-pair-alist' according to the last input
| character with or without modifiers.  If no character pair is
| found in the variable `insert-pair-alist', then the last input
| character is inserted arg times.
`----

E.g., (add-to-list 'insert-pair-alist '(?% ?%))

regards,
andreas

Re: insert pair doesn't work with *, $ and %

[Katsumi Yamaoka]

>>>>> In <mailman.1624.1165460982.2155.help-gnu-emacs@gnu.org>
>>>>>	Dieter Wilhelm wrote:

> For a special mode I'd like to have key bindings duplicating various
> characters like e. g.

> (global-set-key "\C-c{" 'insert-pair)

> this does work as expected (I'm getting a pair of {} and the point is
> within the pair).  But I can't get the analogous with *, $ and % to
> run, I'm just getting one of these characters back and not a pair.
> What am I missing here?

You need to add to the `insert-pair-alist' variable the pairs
corresponding to those keys.  For example:

(add-to-list 'insert-pair-alist '(?* ?*))
(add-to-list 'insert-pair-alist '(?$ ?$))
(add-to-list 'insert-pair-alist '(?% ?%))

how to differentiate between default interactive argument 1 and user supplied argument 1[was: insert pair doesn't work with *, $ and %]

[Dieter Wilhelm]

Andreas Seltenreich <seltenreich@gmx.de> writes:


Katsumi Yamaoka <yamaoka@jpl.org> writes:

>>>>>> In <mailman.1624.1165460982.2155.help-gnu-emacs@gnu.org>
>>>>>>	Dieter Wilhelm wrote:
>
>> For a special mode I'd like to have key bindings duplicating various
>> characters like e. g.
>
>> (global-set-key "\C-c{" 'insert-pair)
>
>> this does work as expected (I'm getting a pair of {} and the point is
>> within the pair).  But I can't get the analogous with *, $ and % to
>> run, I'm just getting one of these characters back and not a pair.
>> What am I missing here?
>
> You need to add to the `insert-pair-alist' variable the pairs
> corresponding to those keys.  For example:
>
> (add-to-list 'insert-pair-alist '(?* ?*))
> (add-to-list 'insert-pair-alist '(?$ ?$))
> (add-to-list 'insert-pair-alist '(?% ?%))

Hi Andreas and Katsumi

Thank you very much.

I think that insert-pair should duplicate by default every input
character when the characters is not in insert-pair-alist.  Except
when the user *prescribes* the numeric argument to 1.

But then, how can one detect programmatically whether the user gives
interactively no argument (default argument 1) and an actual argument
1?

-- 
    Best wishes

    H. Dieter Wilhelm
    Darmstadt, Germany