mirror of
https://github.com/cookiengineer/audacity
synced 2025-07-30 07:29:29 +02:00
Fix printing headers in Sample Data Export
This commit is contained in:
parent
ad19ca0fa2
commit
69fd566678
@ -158,6 +158,11 @@ $control messages (_ "Show messages") choice ((_ "Yes")
|
||||
|
||||
;; Print to file
|
||||
(defun printdata ()
|
||||
(case header
|
||||
(0 (format t (normhead))(format fp (nohead)))
|
||||
(1 (format t (normhead))(format fp (minhead)))
|
||||
(2 (format t (normhead))(format fp (normhead)))
|
||||
(3 (format t (normhead))(format fp (fullhead))))
|
||||
(if (and (arrayp *track*)(= channel-layout 2))
|
||||
;; Stereo and left channel first
|
||||
(progn
|
||||
|
Loading…
x
Reference in New Issue
Block a user