diff options
| author | John Wiegley <johnw@newartisans.com> | 2008-08-29 05:12:58 -0400 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2008-08-29 05:12:58 -0400 |
| commit | bbfcd6d7d246985978b4f06ab3ca9f4e78852f7b (patch) | |
| tree | 7a443e2ee826ce45e7921e84d4ffd9f643789d37 | |
| parent | c397263b4b28430c12f70e0a755998fb5e493659 (diff) | |
Don't report an error if the user's sound reporting function fails to work.
This is needed on OS X, which has the `play-sound-file` function, but when
called reports an error that sound support is not available.
| -rw-r--r-- | chess-sound.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/chess-sound.el b/chess-sound.el index cb6c95c..ed1ce53 100644 --- a/chess-sound.el +++ b/chess-sound.el @@ -42,9 +42,10 @@ :group 'chess-sound) (defsubst chess-sound (file) - (funcall chess-sound-play-function - (expand-file-name (concat file ".wav") - chess-sound-directory))) + (ignore-errors + (funcall chess-sound-play-function + (expand-file-name (concat file ".wav") + chess-sound-directory)))) (defsubst chess-sound-play (file) (apply 'call-process chess-sound-program |