Mercurial > hg > xemacs-beta
diff src/sound.c @ 233:52952cbfc5b5 r20-5b15
Import from CVS: tag r20-5b15
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:14:14 +0200 |
parents | cca96a509cfe |
children | 51092a27c943 |
line wrap: on
line diff
--- a/src/sound.c Mon Aug 13 10:13:49 2007 +0200 +++ b/src/sound.c Mon Aug 13 10:14:14 2007 +0200 @@ -90,10 +90,12 @@ GCPRO1 (file); file = Fexpand_file_name (file, Qnil); if (NILP (Ffile_readable_p (file))) + { if (NILP (Ffile_exists_p (file))) error ("file does not exist."); else error ("file is unreadable."); + } UNGCPRO; #ifdef HAVE_NAS_SOUND