Adding Key bindings

Adding Key bindings

[Paulo J. Matos]

Hi all,

In C++ user mode, TAB key indents the current line, but I would also
like it to auto-complete if possible the current symbol. I would like
it to call: semantic-ia-complete-symbol

Can you possibly tell me how to do this? and if you know, where is the
reference to this topic in GNU Emacs Manual. All places I've searched
on this go on talking about keymaps, keybindings, xmodmap, xev, etc
but are no direct to the point.

Thanks in advance,
-- 
Paulo Jorge Matos - pocm at sat inesc-id pt
Web: http://sat.inesc-id.pt/~pocm
Computer and Software Engineering
INESC-ID - SAT Group

Re: Adding Key bindings

[Paulo J. Matos]

On 20/07/06, Paulo J. Matos <pocmatos@gmail.com> wrote:
> Hi all,
>
> In C++ user mode, TAB key indents the current line, but I would also
> like it to auto-complete if possible the current symbol. I would like
> it to call: semantic-ia-complete-symbol
>

Hi all,

I did:
(add-hook 'c++-mode-hook
	  '(lambda ()
	     (define-key c++-mode-map "\011" 'semantic-ia-complete-symbol)))

However, this rebinds TAB to semantic-ia-complete-symbol and it will
not indent anymore. I don't want previous actions to disappear, I want
to add semantic-ia-complete-symbol action to the TAB key. How can I
mend this?

Cheers,

-- 
Paulo Jorge Matos - pocm at sat inesc-id pt
Web: http://sat.inesc-id.pt/~pocm
Computer and Software Engineering
INESC-ID - SAT Group

Re: Adding Key bindings

[Kevin Rodgers]

Paulo J. Matos wrote:
> I did:
> (add-hook 'c++-mode-hook
>       '(lambda ()
>          (define-key c++-mode-map "\011" 'semantic-ia-complete-symbol)))
> 
> However, this rebinds TAB to semantic-ia-complete-symbol and it will
> not indent anymore. I don't want previous actions to disappear, I want
> to add semantic-ia-complete-symbol action to the TAB key. How can I
> mend this?

How about:

(defun c++-complete-or-indent ()
   (interactive)
   "Try to complete the current symbol at point, otherwise indent."
   ;; Kludge this because semantic-ia-complete-symbol really doesn't
   ;; return anything useful:
   (when (equal (semantic-ia-complete-symbol (point))
	       "No smart completions found.")
     (c-indent-command current-prefix-arg)))

(add-hook 'c++-mode-hook
	  (lambda ()
	    (local-set-key "\t" c++-complete-or-indent)))

-- 
Kevin

Re: Adding Key bindings

[Paulo J. Matos]

On 21/07/06, Kevin Rodgers <ihs_4664@yahoo.com> wrote:
> Paulo J. Matos wrote:
> > I did:
> > (add-hook 'c++-mode-hook
> >       '(lambda ()
> >          (define-key c++-mode-map "\011" 'semantic-ia-complete-symbol)))
> >
> > However, this rebinds TAB to semantic-ia-complete-symbol and it will
> > not indent anymore. I don't want previous actions to disappear, I want
> > to add semantic-ia-complete-symbol action to the TAB key. How can I
> > mend this?
>
> How about:
>
> (defun c++-complete-or-indent ()
>    (interactive)
>    "Try to complete the current symbol at point, otherwise indent."
>    ;; Kludge this because semantic-ia-complete-symbol really doesn't
>    ;; return anything useful:
>    (when (equal (semantic-ia-complete-symbol (point))
>                "No smart completions found.")
>      (c-indent-command current-prefix-arg)))
>
> (add-hook 'c++-mode-hook
>           (lambda ()
>             (local-set-key "\t" c++-complete-or-indent)))
>

Loved it! Thanks, need to learn more about Emacs Lisp! :-)

> --
> Kevin
>
>
>
> _______________________________________________
> help-gnu-emacs mailing list
> help-gnu-emacs@gnu.org
> http://lists.gnu.org/mailman/listinfo/help-gnu-emacs
>


-- 
Paulo Jorge Matos - pocm at sat inesc-id pt
Web: http://sat.inesc-id.pt/~pocm
Computer and Software Engineering
INESC-ID - SAT Group

Re: Adding Key bindings

[Paulo J. Matos]

On 21/07/06, Kevin Rodgers <ihs_4664@yahoo.com> wrote:
> Paulo J. Matos wrote:
> > I did:
> > (add-hook 'c++-mode-hook
> >       '(lambda ()
> >          (define-key c++-mode-map "\011" 'semantic-ia-complete-symbol)))
> >
> > However, this rebinds TAB to semantic-ia-complete-symbol and it will
> > not indent anymore. I don't want previous actions to disappear, I want
> > to add semantic-ia-complete-symbol action to the TAB key. How can I
> > mend this?
>
> How about:
>
> (defun c++-complete-or-indent ()
>    (interactive)
>    "Try to complete the current symbol at point, otherwise indent."
>    ;; Kludge this because semantic-ia-complete-symbol really doesn't
>    ;; return anything useful:
>    (when (equal (semantic-ia-complete-symbol (point))
>                "No smart completions found.")
>      (c-indent-command current-prefix-arg)))
>
> (add-hook 'c++-mode-hook
>           (lambda ()
>             (local-set-key "\t" c++-complete-or-indent)))
>

Hi all,

There's a problem with this code which I'm not being able to solve.
When you are on an empty line, there's no autocompletion but the
cursor is not indented to the correct position either. Any way to
solve this?

Thanks,

Paulo Matos

> --
> Kevin
>
>
>
> _______________________________________________
> help-gnu-emacs mailing list
> help-gnu-emacs@gnu.org
> http://lists.gnu.org/mailman/listinfo/help-gnu-emacs
>


-- 
Paulo Jorge Matos - pocm at sat inesc-id pt
Web: http://sat.inesc-id.pt/~pocm
Computer and Software Engineering
INESC-ID - SAT Group

Re: Adding Key bindings

[Kevin Rodgers]

Paulo J. Matos wrote:
> On 21/07/06, Kevin Rodgers <ihs_4664@yahoo.com> wrote:
>> (defun c++-complete-or-indent ()
>>    (interactive)
>>    "Try to complete the current symbol at point, otherwise indent."
>>    ;; Kludge this because semantic-ia-complete-symbol really doesn't
>>    ;; return anything useful:
>>    (when (equal (semantic-ia-complete-symbol (point))
>>                "No smart completions found.")
>>      (c-indent-command current-prefix-arg)))
>>
>> (add-hook 'c++-mode-hook
>>           (lambda ()
>>             (local-set-key "\t" c++-complete-or-indent)))
>>
> 
> Hi all,
> 
> There's a problem with this code which I'm not being able to solve.
> When you are on an empty line, there's no autocompletion but the
> cursor is not indented to the correct position either. Any way to
> solve this?

Assuming that "on an empty line" means "at the beginning of a line
with no characters (not even whitespace)":

(when (or (looking-at "^$")
	  (equal (semantic-ia-complete-symbol (point))
		 "No smart completions found."))
   (c-indent-command current-prefix-arg))

-- 
Kevin