Will Parsons <oud...@nodomain.invalid> writes:
> I find the new Emacs 22 startup behaviour quite annoying in that it puts
> up a splash screen even when Emacs is invoked with a file name.  I've
> found the inhibit-splash-screen variable to inhibit the splash screen
> entirely, but I'd like to keep the splash screen if Emacs is invoked
> without arguments - just inhibit it if a file is specified.  Is there
> any way to get this to work like Emacs 21?

Sven Joachim wrote:
> Will Parsons <oud...@nodomain.invalid> writes:

>> I find the new Emacs 22 startup behaviour quite annoying in that it puts
>> up a splash screen even when Emacs is invoked with a file name.  I've
>> found the inhibit-splash-screen variable to inhibit the splash screen
>> entirely, but I'd like to keep the splash screen if Emacs is invoked
>> without arguments - just inhibit it if a file is specified.  Is there
>> any way to get this to work like Emacs 21?

> I've just put these 2¢ into my .emacs, which seem to do the trick:

> (when (> (length command-line-args) 1)
>   (setq inhibit-splash-screen t))

Sven Joachim wrote:
> Will Parsons <oud...@nodomain.invalid> writes:

>> I find the new Emacs 22 startup behaviour quite annoying in that it puts
>> up a splash screen even when Emacs is invoked with a file name.  I've
>> found the inhibit-splash-screen variable to inhibit the splash screen
>> entirely, but I'd like to keep the splash screen if Emacs is invoked
>> without arguments - just inhibit it if a file is specified.  Is there
>> any way to get this to work like Emacs 21?

> I've just put these 2¢ into my .emacs, which seem to do the trick:

> (when (> (length command-line-args) 1)

Kevin Rodgers <kevin.d.rodg...@gmail.com> writes:
> Sven Joachim wrote:
>> I've just put these 2¢ into my .emacs, which seem to do the trick:

>> (when (> (length command-line-args) 1)

> That doesn't distinguish file names from other command line arguments
> such as options.

>  A better test might be

>    (> (length (buffer-list) 2)

> assuming that with no file name arguments just the *scratch* and
> *Messages* buffers exist.

Sven Joachim <svenj...@gmx.de> writes:
> Kevin Rodgers <kevin.d.rodg...@gmail.com> writes:

>> Sven Joachim wrote:
>>> I've just put these 2¢ into my .emacs, which seem to do the trick:

>>> (when (> (length command-line-args) 1)

>> That doesn't distinguish file names from other command line arguments
>> such as options.

> True, but those options are already deleted from command-line-args when
> the user's init file is processed.

>>  A better test might be

>>        (> (length (buffer-list) 2)

>> assuming that with no file name arguments just the *scratch* and
>> *Messages* buffers exist.

> That assumption is mistaken, a freshly started Emacs has six buffers:

> (buffer-list)
> => (#<buffer *scratch*> #<buffer  *Minibuf-0*> #<buffer *Messages*>
>     #<buffer  *Echo Area 0*> #<buffer  *Echo Area 1*>
>     #<buffer  *code-conversion-work*>)

> So you'd need to test (> (length (buffer-list) 6).

Johan Bockgård wrote:
> Better test whether there are any file visiting buffers

>     (delq nil (mapcar 'buffer-file-name (buffer-list)))

> Johan Bockgård wrote:
>> Better test whether there are any file visiting buffers
>>     (delq nil (mapcar 'buffer-file-name (buffer-list)))

> Indeed, I was looking at an old version of my ~/.emacs.  Here's
> what I have now:

>    (catch 'inhibit-splash-screen
>      (dolist (buffer (buffer-list) nil)
>        (when (buffer-file-name buffer)
>          (throw 'inhibit-splash-screen t))))

David Brodbeck <bro...@u.washington.edu> writes:
> On Nov 21, 2007, at 11:14 PM, Kevin Rodgers wrote:

>> Johan Bockgård wrote:
>>> Better test whether there are any file visiting buffers
>>>     (delq nil (mapcar 'buffer-file-name (buffer-list)))

>> Indeed, I was looking at an old version of my ~/.emacs.  Here's
>> what I have now:

>>        (catch 'inhibit-splash-screen
>>          (dolist (buffer (buffer-list) nil)
>>            (when (buffer-file-name buffer)
>>              (throw 'inhibit-splash-screen t))))

> Hmm, when I paste this into my .emacs I still get the splash screen,
> even if I supply a filename on the command line.  I must be doing
> something wrong.