programming file-extensions in .emacs

programming file-extensions in .emacs

[efrem]

Hello,
I'd like to change the .emacs file in order to
make some key-setting for the cases of xxxx.f and xxxx.cc files.
The next function does work but It needs to type of "M-x mykeys"(I
don't like it!). I could  put these setting into corresponding xxx.elc
files but I prefer to have these definitions in my .emacs file.
If I remove the  2 first lines of this code then it does not work:
error.
What is the way to change this code  it runs properly without any
typings like "M-x mykeys": the .emacs must do these settings itself?
Thank you in advance
Oleg


(defun mykeys ()
(interactive)
  (let (fname suffix)
    (setq fname (buffer-file-name))
    (setq suffix (file-name-extension fname))
    (if (equal suffix "cc")
        (progn
	  (global-set-key [f2] 'insert-cout1)
	  (global-set-key [f3] 'insert-cout4)
	  ))
    (if (equal suffix "f")
        (progn
	  (global-set-key [f8] 'nn3)
	  (global-set-key [f9] 'delete-backward-char)
	  ))
  ))

Re: programming file-extensions in .emacs

[Jason Rumney]

On 27 Feb, 14:17, efrem <oleg-zhu...@hotmail.ru> wrote:

> I'd like to change the .emacs file in order to
> make some key-setting for the cases of xxxx.f and xxxx.cc files.
...
> What is the way to change this code  it runs properly without any
> typings like "M-x mykeys": the .emacs must do these settings itself?

(add-hook 'fortran-mode-hook 'mykeys)
(add-hook 'c++-mode-hook 'mykeys)

The latter could be replaced with c-mode-common-hook if you want to
extend this to all C like programming languages.

Re: programming file-extensions in .emacs

[Peter Dyballa]

Am 27.02.2008 um 15:17 schrieb efrem:

> I'd like to change the .emacs file in order to
> make some key-setting for the cases of xxxx.f and xxxx.cc files.


Can you think of hooks for fortran-mode or f90-mode or C++-mode that  
would automatically extend the local keymap bindings?

--
Greetings

   Pete

Clovis' Consideration of an Atmospheric Anomaly:
         The perversity of nature is nowhere better demonstrated
         than by the fact that, when exposed to the same atmosphere,
         bread becomes hard while crackers become soft.

Re: programming file-extensions in .emacs

[Harald Hanche-Olsen]

+ efrem <oleg-zhukov@hotmail.ru>:

> I'd like to change the .emacs file in order to
> make some key-setting for the cases of xxxx.f and xxxx.cc files.

Then take advantage of the work that emacs already does for you, and
change the key definitions for the corresponding modes.  *.f and *.cc
are edited using fortran-mode and c++-mode respectively.  And these
modes, when activated, cause the running of hooks name fortran-mode-hook
and c++-mode-hook respectively.  So instead of

>   (let (fname suffix)
>     (setq fname (buffer-file-name))
>     (setq suffix (file-name-extension fname))
>     (if (equal suffix "cc")
>         (progn
> 	  (global-set-key [f2] 'insert-cout1)
> 	  (global-set-key [f3] 'insert-cout4)
> 	  ))
>     (if (equal suffix "f")
>         (progn
> 	  (global-set-key [f8] 'nn3)
> 	  (global-set-key [f9] 'delete-backward-char)
> 	  ))

you may try this in your .emacs:

(defun set-my-c++-keys ()
  (local-set-key [f2] 'insert-cout1)
  (local-set-key [f3] 'insert-cout4))

(add-hook 'c++-mode-hook 'set-my-c++-keys)

(defun set-my-fortran-keys ()
  (local-set-key [f8] 'nn3)
  (local-set-key [f9] 'delete-backward-char))

(add-hook 'fortran-mode-hook 'set-my-fortran-keys)

Note that I use local-set-key.  There is little point, I think, in
polluting the global keymap with mode specific bindings.

-- 
* Harald Hanche-Olsen     <URL:http://www.math.ntnu.no/~hanche/>
- It is undesirable to believe a proposition
  when there is no ground whatsoever for supposing it is true.
  -- Bertrand Russell

Re: programming file-extensions in .emacs

[efrem]

On Feb 27, 7:55 pm, Harald Hanche-Olsen <han...@math.ntnu.no> wrote:
> + efrem <oleg-zhu...@hotmail.ru>:
>
> > I'd like to change the .emacs file in order to
> > make some key-setting for the cases of xxxx.f and xxxx.cc files.
>
> Then take advantage of the work that emacs already does for you, and
> change the key definitions for the corresponding modes.  *.f and *.cc
> are edited using fortran-mode and c++-mode respectively.  And these
> modes, when activated, cause the running of hooks name fortran-mode-hook
> and c++-mode-hook respectively.  So instead of
>
> >   (let (fname suffix)
> >     (setq fname (buffer-file-name))
> >     (setq suffix (file-name-extension fname))
> >     (if (equal suffix "cc")
> >         (progn
> >      (global-set-key [f2] 'insert-cout1)
> >      (global-set-key [f3] 'insert-cout4)
> >      ))
> >     (if (equal suffix "f")
> >         (progn
> >      (global-set-key [f8] 'nn3)
> >      (global-set-key [f9] 'delete-backward-char)
> >      ))
>
> you may try this in your .emacs:
>
> (defun set-my-c++-keys ()
>   (local-set-key [f2] 'insert-cout1)
>   (local-set-key [f3] 'insert-cout4))
>
> (add-hook 'c++-mode-hook 'set-my-c++-keys)
>
> (defun set-my-fortran-keys ()
>   (local-set-key [f8] 'nn3)
>   (local-set-key [f9] 'delete-backward-char))
>
> (add-hook 'fortran-mode-hook 'set-my-fortran-keys)
>
> Note that I use local-set-key.  There is little point, I think, in
> polluting the global keymap with mode specific bindings.
>
> --
> * Harald Hanche-Olsen     <URL:http://www.math.ntnu.no/~hanche/>
> - It is undesirable to believe a proposition
>   when there is no ground whatsoever for supposing it is true.
>   -- Bertrand Russell

It's good.
Thank you very much!
Best wishes
Oleg