Use *scratch* for startup messages?

Use *scratch* for startup messages?

[Florian Lindner]

Hello!

I have (setq inhibit-startup-message t) so I start up with the
*scratch* buffer which I hardly ever use. A thought crossed my mind to
use this buffer as a output for some user generated start up messages,
such as org-mode's TODO list or content of refile buffer, ...

So when Emacs starts, it presents a scratch buffer with my current
TODO list. All other properties of the buffer keep the same (like it's
not being saved).

Since I consider myself still novice with Emacs I'm unsure how to
program that into my .emacs and if there problems with this to be
expected....

Thanks for any thoughts!

Florian

Re: Use *scratch* for startup messages?

[Christopher Schmidt]

Florian Lindner <mailinglists@xgm.de> writes:
> I have (setq inhibit-startup-message t) so I start up with the
> *scratch* buffer which I hardly ever use. A thought crossed my mind to
> use this buffer as a output for some user generated start up messages,
> such as org-mode's TODO list or content of refile buffer, ...
>
> So when Emacs starts, it presents a scratch buffer with my current
> TODO list. All other properties of the buffer keep the same (like it's
> not being saved).
>
> Since I consider myself still novice with Emacs I'm unsure how to
> program that into my .emacs and if there problems with this to be
> expected....

with-current-buffer should be fine.

    (with-current-buffer "*scratch*"
      (insert "Ich bin im Skratsch"))

    (with-current-buffer "*scratch*"
      (insert
       (save-window-excursion
         (org-agenda-list)
         (buffer-string))))

        Christopher

Re: Use *scratch* for startup messages?

[drain]

If you have any of this information stored in a custom file (org file
perhaps), you might want to go an even simpler route:

(switch-to-buffer (find-file "~/agenda/my-custom-agenda.org"))

or

(switch-to-buffer (find-file "~/agenda/my-custom-agenda.txt"))

etc.



--
View this message in context: http://emacs.1067599.n5.nabble.com/Use-scratch-for-startup-messages-tp274852p274858.html
Sent from the Emacs - Help mailing list archive at Nabble.com.

Re: Use *scratch* for startup messages?

[Stefan Monnier]

> (switch-to-buffer (find-file "~/agenda/my-custom-agenda.org"))

There's a redundancy here: find-file = switch-to-buffer + find-file-noselect

So either use find-file and drop the switch-to-buffer, or replace
find-file with find-file-noselect.


        Stefan

Re: Use *scratch* for startup messages?

[Florian Lindner]

Am Mittwoch, 9. Januar 2013, 23:53:44 schrieb Christopher Schmidt:
> Florian Lindner <mailinglists@xgm.de> writes:
> > I have (setq inhibit-startup-message t) so I start up with the
> > *scratch* buffer which I hardly ever use. A thought crossed my mind to
> > use this buffer as a output for some user generated start up messages,
> > such as org-mode's TODO list or content of refile buffer, ...
> > 
> > So when Emacs starts, it presents a scratch buffer with my current
> > TODO list. All other properties of the buffer keep the same (like it's
> > not being saved).
> > 
> > Since I consider myself still novice with Emacs I'm unsure how to
> > program that into my .emacs and if there problems with this to be
> > expected....
> 
> with-current-buffer should be fine.
> 
>     (with-current-buffer "*scratch*"
>       (insert "Ich bin im Skratsch"))
> 
>     (with-current-buffer "*scratch*"
>       (insert
>        (save-window-excursion
>          (org-agenda-list)
>          (buffer-string))))

Thanks! I have now:

(with-current-buffer "*scratch*"
      (insert
       (save-window-excursion
       org-todo-list)))

but I get: Symbol's value as variable is void: org-todo-list

I tried some shots, like (load "org") but none of that made it. What's the 
best way to load org-mode at the start? (or make this symbol available)

Regards,
Florian

Re: Use *scratch* for startup messages?

[Christopher Schmidt]

Florian Lindner <mailinglists@xgm.de> writes:
> (with-current-buffer "*scratch*"
>       (insert
>        (save-window-excursion
>        org-todo-list)))
         ^^^^^^^^^^^^^
>
> but I get: Symbol's value as variable is void: org-todo-list

    (org-todo-list)
    (buffer-string)

BTW you can evaluate any function or form, e.g. split-window-below (C-x
2), split-window-right (C-x 3) or other-window (C-x o), to build an
arbitrary window configuration after startup.

    (run-at-time
     nil nil
     (lambda ()
       (split-window-below)
       (switch-to-buffer (save-window-excursion
                           (org-todo-list)
                           (current-buffer)))
       (other-window 1)
       (switch-to-buffer (with-current-buffer (get-buffer-create "<3")
                           (insert "RMS")
                           (current-buffer)))))

I use run-at-time so the configuration is set after Emacs messes with
the window configuration due to initial-buffer-choice.  Emacs does this
after running after-init-hook.

        Christopher