Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
ed1f0a45
Commit
ed1f0a45
authored
Nov 29, 2006
by
Juanma Barranquero
Browse files
(Fplay_sound_internal): Remove spurious newline in docstring.
parent
04c21c78
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
8 additions
and
8 deletions
+8
-8
src/sound.c
src/sound.c
+8
-8
No files found.
src/sound.c
View file @
ed1f0a45
...
...
@@ -1015,14 +1015,14 @@ alsa_configure (sd)
val
=
sd
->
format
;
err
=
snd_pcm_hw_params_set_format
(
p
->
handle
,
p
->
hwparams
,
val
);
if
(
err
<
0
)
if
(
err
<
0
)
alsa_sound_perror
(
"Could not set sound format"
,
err
);
uval
=
sd
->
sample_rate
;
err
=
snd_pcm_hw_params_set_rate_near
(
p
->
handle
,
p
->
hwparams
,
&
uval
,
0
);
if
(
err
<
0
)
alsa_sound_perror
(
"Could not set sample rate"
,
err
);
val
=
sd
->
channels
;
err
=
snd_pcm_hw_params_set_channels
(
p
->
handle
,
p
->
hwparams
,
val
);
if
(
err
<
0
)
...
...
@@ -1072,11 +1072,11 @@ alsa_configure (sd)
p
->
hwparams
=
NULL
;
snd_pcm_sw_params_free
(
p
->
swparams
);
p
->
swparams
=
NULL
;
err
=
snd_pcm_prepare
(
p
->
handle
);
if
(
err
<
0
)
alsa_sound_perror
(
"Could not prepare audio interface for use"
,
err
);
if
(
sd
->
volume
>
0
)
{
int
chn
;
...
...
@@ -1098,7 +1098,7 @@ alsa_configure (sd)
long
pmin
,
pmax
;
snd_mixer_selem_get_playback_volume_range
(
e
,
&
pmin
,
&
pmax
);
long
vol
=
pmin
+
(
sd
->
volume
*
(
pmax
-
pmin
))
/
100
;
for
(
chn
=
0
;
chn
<=
SND_MIXER_SCHN_LAST
;
chn
++
)
snd_mixer_selem_set_playback_volume
(
e
,
chn
,
vol
);
}
...
...
@@ -1230,9 +1230,9 @@ alsa_write (sd, buffer, nbytes)
err
);
}
}
else
else
alsa_sound_perror
(
"Error writing to sound device"
,
err
);
}
else
nwritten
+=
err
*
fact
;
...
...
@@ -1374,7 +1374,7 @@ do_play_sound (psz_file, ui_volume)
DEFUN
(
"play-sound-internal"
,
Fplay_sound_internal
,
Splay_sound_internal
,
1
,
1
,
0
,
doc
:
/* Play sound SOUND.
Internal use only, use `play-sound' instead.
\n
*/
)
Internal use only, use `play-sound' instead. */
)
(
sound
)
Lisp_Object
sound
;
{
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment