how to define a comment syntax for files having a specific extension?

how to define a comment syntax for files having a specific extension?

[gento]

Hi All, I'm using
"GNU Emacs 21.2.1 (i686-pc-cygwin, X toolkit) of 2004-03-22 on cm-
test"
and working on journal text files *.jou for which the commented lines
must start with the character "/".

While editing one of such files I need to run
M-: (setq comment-start "/")
in order to comment regions with the sequence C-c;

I'd like to have emacs recognize the "*.jou" files and
apply the corresponding comment syntax automatically,
sparing me from having to type
M-: (setq comment-start "/")
each time I start working on a *.jou file.

I appreciate any help

Re: how to define a comment syntax for files having a specific extension?

[Stefan Monnier]

> and working on journal text files *.jou for which the commented lines
> must start with the character "/".

> While editing one of such files I need to run
> M-: (setq comment-start "/")
> in order to comment regions with the sequence C-c;

> I'd like to have emacs recognize the "*.jou" files and
> apply the corresponding comment syntax automatically,
> sparing me from having to type
> M-: (setq comment-start "/")
> each time I start working on a *.jou file.

You need to create a major mode for those types of files.
Check out sample-mode.el


        Stefan

Re: how to define a comment syntax for files having a specific extension?

[gento]

> You need to create a major mode for those types of files.
> Check out sample-mode.el

Thank you Stefan.

Is there a simplest way for reaching this scope,
for example by modifying the ~/.emacs file only?

Re: how to define a comment syntax for files having a specific extension?

[Pascal Bourguignon]

"gento" <gento_distefano@hotmail.com> writes:

>> You need to create a major mode for those types of files.
>> Check out sample-mode.el
>
> Thank you Stefan.
>
> Is there a simplest way for reaching this scope,
> for example by modifying the ~/.emacs file only?

Well, there is first the simpliest way to do it: insert a file
variable comment in these files. (info "(emacs)File Variables")

/ -*- mode:text; comment-start:"/"; coding:utf-8 

on the first or second line, or:

/ Local Variables:
/ mode: text
/ comment-start: "/"
/ coding: utf-8
/ End:

at the end.



You don't necessarily need to make a major mode, you can put any
function in auto-mode-alist.

(require 'cl)
(push `(\\.jou$" . ,(lambda ()
                       (text-mode)
                       (setf comment-start "/"))) 
      auto-mode-alist)

should work (not tested).


Also you could do it with a find-file-hook, etc.

-- 
__Pascal Bourguignon__
http://www.informatimago.com
http://pjb.ogamita.org

Re: how to define a comment syntax for files having a specific extension?

[gento]

> (require 'cl)
> (push `(\\.jou$" . ,(lambda ()
>                        (text-mode)
>                        (setf comment-start "/")))
>       auto-mode-alist)

It has worked !

> Also you could do it with a find-file-hook, etc.

I've  actually preferred this solution

(add-hook 'find-file-hooks
     (lambda ()
        (when (string-match "\\.jou$" (buffer-file-name))
           (setq comment-start "/")
        )
     )
)

that I have adapted on the basis of your post
http://groups.google.it/group/gnu.emacs.help/msg/83d7d3c1217a98b2

thank you

Re: how to define a comment syntax for files having a specific extension?

[Tim X]

"gento" <gento_distefano@hotmail.com> writes:

>> You need to create a major mode for those types of files.
>> Check out sample-mode.el
>
> Thank you Stefan.
>
> Is there a simplest way for reaching this scope,
> for example by modifying the ~/.emacs file only?
>

If the only issue is defining what emacs things is a comment, couldn't youjust
modify the syntax table and set the appropriate value to mark the comment
character? 

If not, its *really* easy to define a derived mode. You could derive a specific
mode for these files from text or fundamental mode. There is an example of a
derived mode on the meacs wiki I think (http://www.emacswiki.org).

tim

-- 
tcross (at) rapttech dot com dot au