unofficial mirror of help-gnu-emacs@gnu.org
 help / color / mirror / Atom feed
From: Mirko <mvukovic@nycap.rr.com>
To: help-gnu-emacs@gnu.org
Subject: Re: How to set a file major mode in elisp
Date: Mon, 05 Nov 2007 05:40:23 -0800	[thread overview]
Message-ID: <1194270023.634035.324210@19g2000hsx.googlegroups.com> (raw)
In-Reply-To: <mailman.2912.1194037808.18990.help-gnu-emacs@gnu.org>

On Nov 2, 4:10 pm, Peter Dyballa <Peter_Dyba...@Web.DE> wrote:
> Am 02.11.2007 um 17:54 schrieb Mirko:
>
> > I don't want to mess with the diary file format if I can avoid it.
>
> You don't mess with the file format if you add local variables - you
> just make it clear to GNU Emacs what is obvious for you!
>
> I, for example, make clear that the diary file is in UTF-8:
>
>         ;; Local variables:
>         ;; coding: utf-8
>         ;; End:
>
> and you can add
>
>         ;; mode: diary
>
> --
> Greetings
>
>    Pete
>
> ...And always remember the last words of my grandfather, who said:
>       "A truck!"          - Emo Phillips

Well, I decided to "cheat" by using the "built-in" make-diary-entry.
This function will set-up the file mode correctly.

(defun hj-entry ()
  "Insert the jounral template into the diary file"
  (interactive)
  (let ((calendar-date-display-form '((substring monthname 0 3) " "
day ", " year)))
    (make-diary-entry (concat (calendar-date-string (calendar-current-
date))
			      " Journal: "))))

Thanks,

Mirko

      parent reply	other threads:[~2007-11-05 13:40 UTC|newest]

Thread overview: 7+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2007-11-02 12:42 How to set a file major mode in elisp Mirko
2007-11-02 13:56 ` Eric Hanchrow
2007-11-02 13:58 ` Sebastian Tennant
2007-11-02 15:05 ` Bastien
     [not found] ` <mailman.2888.1194012501.18990.help-gnu-emacs@gnu.org>
2007-11-02 16:54   ` Mirko
2007-11-02 21:10     ` Peter Dyballa
     [not found]     ` <mailman.2912.1194037808.18990.help-gnu-emacs@gnu.org>
2007-11-05 13:40       ` Mirko [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

  List information: https://www.gnu.org/software/emacs/

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=1194270023.634035.324210@19g2000hsx.googlegroups.com \
    --to=mvukovic@nycap.rr.com \
    --cc=help-gnu-emacs@gnu.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).