Emacs . How can I associate *.cu files as cc mode as a default ?

Emacs . How can I associate *.cu files as cc mode as a default ?

[Mike H]

Emacs . How can I associate *.cu files as cc mode as a default ?
cc mode is automatically triggered when I open *.c, *.cpp files.
However, I would like to add the new file type :)

Thank you!

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Tyler Smith]

On 2007-09-19, Mike H <hspnew@gmail.com> wrote:
> Emacs . How can I associate *.cu files as cc mode as a default ?
> cc mode is automatically triggered when I open *.c, *.cpp files.
> However, I would like to add the new file type :)

You can do this with find-file-hooks. This is code that runs anytime
you find (open) a file. In this case, you want to check and see if the
file you've found ends with .cu, and if so, to use cc-mode. This
function will do that:

(defun my-find-file-hook()
  (let ((fn (buffer-file-name)))
    (when (string-match "\\.cu$" fn)
      (cc-mode))))

You have to tell Emacs to run this function every time you open a new
file, so you add the hook: 

(add-hook 'find-file-hooks 'my-find-file-hook)

Put both forms in your .emacs, and the next time you open emacs you'll
be all ready to go. (you can also load them into a running emacs using
C-x C-e to execute the previous command in a lisp-mode buffer, such as
scratch or .emacs).

HTH,

Tyler

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Mike H]

On Sep 18, 8:28 pm, Tyler Smith <tyler.sm...@mail.mcgill.ca> wrote:
> On 2007-09-19, Mike H <hsp...@gmail.com> wrote:
>
> > Emacs . How can I associate *.cu files as cc mode as a default ?
> > cc mode is automatically triggered when I open *.c, *.cpp files.
> > However, I would like to add the new file type :)
>
> You can do this with find-file-hooks. This is code that runs anytime
> you find (open) a file. In this case, you want to check and see if the
> file you've found ends with .cu, and if so, to use cc-mode. This
> function will do that:
>
> (defun my-find-file-hook()
>   (let ((fn (buffer-file-name)))
>     (when (string-match "\\.cu$" fn)
>       (cc-mode))))
>
> You have to tell Emacs to run this function every time you open a new
> file, so you add the hook:
>
> (add-hook 'find-file-hooks 'my-find-file-hook)
>
> Put both forms in your .emacs, and the next time you open emacs you'll
> be all ready to go. (you can also load them into a running emacs using
> C-x C-e to execute the previous command in a lisp-mode buffer, such as
> scratch or .emacs).
>
> HTH,
>
> Tyler


Thank you !  I really appreciate it !

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Mike H]

Just one thing ,

When I put those scripts in, and when I open *.cu files,
I get the following...

Symbol's function definition is void


Any solutions? :)

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Tyler Smith]

On 2007-09-19, Mike H <hspnew@gmail.com> wrote:
> Just one thing ,
>
> When I put those scripts in, and when I open *.cu files,
> I get the following...
>
> Symbol's function definition is void
>

It should be (c-mode), not (cc-mode). The following works for
me:

(defun my-find-file-hook()
  (let ((fn (buffer-file-name)))
    (when (string-match "\\.cu$" fn)
      (c-mode))))
(add-hook 'find-file-hooks 'my-find-file-hook)

Tyler

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Mike H]

On Sep 18, 10:01 pm, Tyler Smith <tyler.sm...@mail.mcgill.ca> wrote:
> On 2007-09-19, Mike H <hsp...@gmail.com> wrote:
>
> > Just one thing ,
>
> > When I put those scripts in, and when I open *.cu files,
> > I get the following...
>
> > Symbol's function definition is void
>
> It should be (c-mode), not (cc-mode). The following works for
> me:
>
> (defun my-find-file-hook()
>   (let ((fn (buffer-file-name)))
>     (when (string-match "\\.cu$" fn)
>       (c-mode))))
> (add-hook 'find-file-hooks 'my-find-file-hook)
>
> Tyler


Thanks a lot !! it works now

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Richard G Riley]

Mike H <hspnew@gmail.com> writes:

> On Sep 18, 10:01 pm, Tyler Smith <tyler.sm...@mail.mcgill.ca> wrote:
>> On 2007-09-19, Mike H <hsp...@gmail.com> wrote:
>>
>> > Just one thing ,
>>
>> > When I put those scripts in, and when I open *.cu files,
>> > I get the following...
>>
>> > Symbol's function definition is void
>>
>> It should be (c-mode), not (cc-mode). The following works for
>> me:
>>
>> (defun my-find-file-hook()
>>   (let ((fn (buffer-file-name)))
>>     (when (string-match "\\.cu$" fn)
>>       (c-mode))))
>> (add-hook 'find-file-hooks 'my-find-file-hook)
>>
>> Tyler
>
>
> Thanks a lot !! it works now

See the other reply. It is a better way:

      (add-to-list 'auto-mode-alist '("\\.cu$" . c-mode))

find-file-hooks is obsolete in newer versions of emacs.

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Tyler Smith]

On 2007-09-19, Richard G Riley <rileyrgdev@googlemail.com> wrote:
>> On Sep 18, 10:01 pm, Tyler Smith <tyler.sm...@mail.mcgill.ca> wrote:
>>> It should be (c-mode), not (cc-mode). The following works for
>>> me:
>>>
>>> (defun my-find-file-hook()
>>>   (let ((fn (buffer-file-name)))
>>>     (when (string-match "\\.cu$" fn)
>>>       (c-mode))))
>>> (add-hook 'find-file-hooks 'my-find-file-hook)
>
> See the other reply. It is a better way:
>
>       (add-to-list 'auto-mode-alist '("\\.cu$" . c-mode))
>
> find-file-hooks is obsolete in newer versions of emacs.

Thanks for the correction. I see now that I had a few 'auto-mode-alist
lines in my .emacs serving this purpose, but I didn't really
understand them.

Reading the manual, I see that find-file-hooks is now obsolete - will
find-file-hook be obsolete also? What should I replace the following
code with:

(defun my-find-file-hook()
  (let ((fn (buffer-file-name)))
    (when (string-match "latex2rtf" fn)
      (set-variable 'tab-width 4))))
(add-hook 'find-file-hook 'my-find-file-hook)

I use this because a project I'm working on uses a tab-width of 4 for
formatting their c code. I take it that's not ideal, but it's not my
decision. Anyways, all the files are in a directory called latex2rtf,
so this hook does what I need. What is the preferred way to accomplish
this?

Thanks,

Tyler

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Gordon Beaton]

On 19 Sep 2007 15:47:19 GMT, Tyler Smith wrote:
> (defun my-find-file-hook()
>   (let ((fn (buffer-file-name)))
>     (when (string-match "latex2rtf" fn)
>       (set-variable 'tab-width 4))))
> (add-hook 'find-file-hook 'my-find-file-hook)
>
> I use this because a project I'm working on uses a tab-width of 4
> for formatting their c code. I take it that's not ideal, but it's
> not my decision. Anyways, all the files are in a directory called
> latex2rtf, so this hook does what I need. What is the preferred way
> to accomplish this?

If you want to do this for all files of that type, then c-mode-hook is
a better place to put the function, which doesn't need to check the
filename:

  (add-hook 'c-mode-hook (lambda() (setq c-basic-offset 4)))

Alternatively, use file variables to save settings specific to that
file in the file itself. Put a comment like this one near the end of
the file:

  /*
   * Local Variables:
   * mode:c
   * c-basic-offset: 4
   * End:
   */

/gordon

--

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Tyler Smith]

On 2007-09-19, Gordon Beaton <n.o.t@for.email> wrote:
> On 19 Sep 2007 15:47:19 GMT, Tyler Smith wrote:
>> (add-hook 'find-file-hook 'my-find-file-hook)
>>
>
> If you want to do this for all files of that type, then c-mode-hook is
> a better place to put the function, which doesn't need to check the
> filename:
>
>   (add-hook 'c-mode-hook (lambda() (setq c-basic-offset 4)))

Thanks for the suggestion, but this is something I want to use only on 
files for this particular project, not all c code. 

>
> Alternatively, use file variables to save settings specific to that
> file in the file itself. Put a comment like this one near the end of
> the file:
>
>   /*
>    * Local Variables:
>    * mode:c
>    * c-basic-offset: 4
>    * End:
>    */
>

Another good suggestion, and maybe the best alternative to my 
find-file-hook. Is there something in particular that is bad about 
find-file-hook, or is it just because there are better options to use 
that I should avoid it?

Thanks!

Tyler

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Lowell Gilbert]

Tyler Smith <tyler.smith@mail.mcgill.ca> writes:

> On 2007-09-19, Gordon Beaton <n.o.t@for.email> wrote:
>> On 19 Sep 2007 15:47:19 GMT, Tyler Smith wrote:
>>> (add-hook 'find-file-hook 'my-find-file-hook)
>>>
>>
>> If you want to do this for all files of that type, then c-mode-hook is
>> a better place to put the function, which doesn't need to check the
>> filename:
>>
>>   (add-hook 'c-mode-hook (lambda() (setq c-basic-offset 4)))
>
> Thanks for the suggestion, but this is something I want to use only on 
> files for this particular project, not all c code. 

I have something like this, to avoid needing to put file-local
variables in every file in a subtree:

                   (if (string-match "/path/to/files/" (buffer-file-name))
                                       (my-work-environment))

where my-work-environment is a function I wrote that sets a lot of 
configuration to match corporate source code guidelines.

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Stefan Monnier]

> Reading the manual, I see that find-file-hooks is now obsolete - will
> find-file-hook be obsolete also?

No: find-file-hooks is obsolete only because it was renamed to find-file-hook.

> What should I replace the following
> code with:

> (defun my-find-file-hook()
>   (let ((fn (buffer-file-name)))
>     (when (string-match "latex2rtf" fn)
>       (set-variable 'tab-width 4))))
> (add-hook 'find-file-hook 'my-find-file-hook)

You can keep it as-is.  Although I'd use (setq tab-width 4) instead of
set-variable (set-variable is meant for interactive use, not that it matters
in this case).

Actually I'd probably do it that way instead:

   (defun my-latex2rtf-c-mode ()
     (c-mode)
     (setq tab-width 4))

   (add-to-list 'auto-mode-alist
                '("/latex2rtf/.*\\.c\\'" . my-latex2rtf-c-mode))

Not sure if it's better.


        Stefan

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Tyler Smith]

On 2007-09-19, Stefan Monnier <monnier@iro.umontreal.ca> wrote:
>> Reading the manual, I see that find-file-hooks is now obsolete - will
>> find-file-hook be obsolete also?
>
> No: find-file-hooks is obsolete only because it was renamed to find-file-hook.
>
>> What should I replace the following
>> code with:
>
>> (defun my-find-file-hook()
>>   (let ((fn (buffer-file-name)))
>>     (when (string-match "latex2rtf" fn)
>>       (set-variable 'tab-width 4))))
>> (add-hook 'find-file-hook 'my-find-file-hook)
>
> You can keep it as-is.  Although I'd use (setq tab-width 4) instead of
> set-variable (set-variable is meant for interactive use, not that it matters
> in this case).
>
> Actually I'd probably do it that way instead:
>
>    (defun my-latex2rtf-c-mode ()
>      (c-mode)
>      (setq tab-width 4))
>
>    (add-to-list 'auto-mode-alist
>                 '("/latex2rtf/.*\\.c\\'" . my-latex2rtf-c-mode))
>

Actually, that's closer to what I really want. Thanks for the
suggestion! And to Lowell for your help too.

Cheers,

Tyler

Re: Emacs . How can I associate *.cu files as cc mode as a default ?

[Gordon Beaton]

On 19 Sep 2007 00:28:09 GMT, Tyler Smith wrote:
> This function will do that:
>
> (defun my-find-file-hook()
>   (let ((fn (buffer-file-name)))
>     (when (string-match "\\.cu$" fn)
>       (cc-mode))))
>
> You have to tell Emacs to run this function every time you open a new
> file, so you add the hook:
>
> (add-hook 'find-file-hooks 'my-find-file-hook)


No need for the function. Just add the extension to auto-mode-alist:

      (add-to-list 'auto-mode-alist '("\\.cu$" . c-mode))

/gordon

--