Prefer list1 (X) to Fcons (X, Qnil) when building lists.

[bpt/emacs.git] / src / sound.c

diff --git a/src/sound.c b/src/sound.c
index 5ce185e..c476b30 100644 (file)
--- a/src/sound.c
+++ b/src/sound.c
@@ -1352,7 +1352,7 @@ Internal use only, use `play-sound' instead.  */)
   if (STRINGP (attrs[SOUND_FILE]))
     {
       /* Open the sound file.  */
-      current_sound->fd = openp (Fcons (Vdata_directory, Qnil),
+      current_sound->fd = openp (list1 (Vdata_directory),
                                 attrs[SOUND_FILE], Qnil, &file, Qnil);
       if (current_sound->fd < 0)
        sound_perror ("Could not open sound file");