Running just-one-space after expand-abbrev

Running just-one-space after expand-abbrev

[Ian Eure]

I have abbrevs for public/protected/private: pub/prot/pri.

I often find that I'm editing something like:

public function foo();

And I want to change it from public to protected. My first thought is:  
C-a M-d prot SPC

The problem is that the M-d leaves the whitespace to the left of  
"function," and the SPC to expand the   abbrev gives another, so now I  
have two spaces.

Is it possible to run (just-one-space) after an abbrev is expanded? I  
tried advising (expand-abbrev), but that didn't work. I don't see any  
hooks for that function, either.

Ideas?

Re: Running just-one-space after expand-abbrev

[aartist]

On Nov 12, 12:49 pm, Ian Eure <i...@digg.com> wrote:
> I have abbrevs for public/protected/private: pub/prot/pri.
>
> I often find that I'm editing something like:
>
> public function foo();
>
> And I want to change it from public to protected. My first thought is:  
> C-a M-d prot SPC
>
> The problem is that the M-d leaves the whitespace to the left of  
> "function," and the SPC to expand the   abbrev gives another, so now I  
> have two spaces.
>
> Is it possible to run (just-one-space) after an abbrev is expanded? I  
> tried advising (expand-abbrev), but that didn't work. I don't see any  
> hooks for that function, either.
>
> Ideas?
Are you sure?
I couldn't repeat it..

Re: Running just-one-space after expand-abbrev

[Ian Eure]

On Nov 12, 2008, at 2:28 PM, aartist wrote:

> On Nov 12, 12:49 pm, Ian Eure <i...@digg.com> wrote:
>> I have abbrevs for public/protected/private: pub/prot/pri.
>>
>> I often find that I'm editing something like:
>>
>> public function foo();
>>
>> And I want to change it from public to protected. My first thought  
>> is:
>> C-a M-d prot SPC
>>
>> The problem is that the M-d leaves the whitespace to the left of
>> "function," and the SPC to expand the   abbrev gives another, so  
>> now I
>> have two spaces.
>>
>> Is it possible to run (just-one-space) after an abbrev is expanded? I
>> tried advising (expand-abbrev), but that didn't work. I don't see any
>> hooks for that function, either.
>>
>> Ideas?
> Are you sure?
> I couldn't repeat it..
Can you explain what you did to make it work?

This is what I tried, and I just confirmed it does not work:

(defadvice abbrev-expand (after one-space activate)
   "Run just-one-space after expanding an abbrev"
   (just-one-space))

To be clear: This works if I hit C-x '. It does not work if I'm using  
the abbrev minor mode and something is automatically expanded when I  
hit SPC.

  - Ian

Re: Running just-one-space after expand-abbrev

[Nikolaj Schumacher]

Ian Eure <ian@digg.com> wrote:

> The problem is that the M-d leaves the whitespace to the left of
> "function," and the SPC to expand the abbrev gives another, so now I
> have two spaces.

This has annoyed me as well in the past.  I took a different route in
the solution.  just-one-space would collide with my finger memory when
inserting something in the middle.  Instead I chose to give the tab key
an additional function

(defun tab-command ()
  "Do the right thing for the tab key."
  (interactive)
  (or (expand-abbrev)
      (indent-according-to-mode)))

My tab-command does in fact do many more things depending on context.
This is the abridged version. :)


regards,
Nikolaj Schumacher

Re: Running just-one-space after expand-abbrev

[Ian Eure]

On Nov 13, 2008, at 11:33 AM, Nikolaj Schumacher wrote:

> Ian Eure <ian@digg.com> wrote:
>
>> The problem is that the M-d leaves the whitespace to the left of
>> "function," and the SPC to expand the abbrev gives another, so now I
>> have two spaces.
>
> This has annoyed me as well in the past.  I took a different route in
> the solution.  just-one-space would collide with my finger memory when
> inserting something in the middle.  Instead I chose to give the tab  
> key
> an additional function
>
> (defun tab-command ()
>  "Do the right thing for the tab key."
>  (interactive)
>  (or (expand-abbrev)
>      (indent-according-to-mode)))
>
> My tab-command does in fact do many more things depending on context.
> This is the abridged version. :)
>
Alas, this doesn't solve the case I illustrated, since I want to  
eliminate extra whitespace from the middle of the line, rather than  
fix whitespace at the beginning.

I think I may need to disable the global abbrev mode and rebind SPC to  
(self-insert-command) (and (expand-abbrev) (just-one-space)).

Thanks for the suggestion, though.

  - Ian

Re: Running just-one-space after expand-abbrev

[Nikolaj Schumacher]

Ian Eure <ian@digg.com> wrote:

> On Nov 13, 2008, at 11:33 AM, Nikolaj Schumacher wrote:
>
>> (defun tab-command ()
>>  "Do the right thing for the tab key."
>>  (interactive)
>>  (or (expand-abbrev)
>>      (indent-according-to-mode)))
>>
>> My tab-command does in fact do many more things depending on context.
>> This is the abridged version. :)
>>
> Alas, this doesn't solve the case I illustrated, since I want to
> eliminate extra whitespace from the middle of the line, rather than
> fix whitespace at the beginning.

I think you misunderstood.  The `indent-according-to-mode' part is just
for compatibility for the old meaning of tab.  The solution I use is:

void prot function
         ^

With cursor at ^ I just use my command instead of space.  So the second
space is never added.

regards,
Nikolaj Schumacher