opus conversie

private/config.rkt

@@ -12,6 +12,7 @@
          manager-config-log-file
          manager-config-max-sample-rate
          manager-config-hash-algorithm
+         manager-config-change-detection
          manager-config-dry-run?
          manager-config-display-log?
          manager-config-compression-level
@@ -32,7 +33,7 @@
          ensure-default-config!)
 
 (struct manager-config
-  (base-dir ini-file state-file log-file max-sample-rate hash-algorithm dry-run?
+  (base-dir ini-file state-file log-file max-sample-rate hash-algorithm change-detection dry-run?
             display-log? compression-level mail-enabled? mail-send-on-success?
             mail-send-on-error? mail-host mail-port mail-tls? mail-username
             mail-password mail-from mail-to mail-cc mail-bcc mail-subject-prefix)
@@ -52,6 +53,7 @@
     (define ini (make-ini))
     (ini-set! ini 'manager 'max-sample-rate 48000)
     (ini-set! ini 'manager 'hash-algorithm "sha256")
+    (ini-set! ini 'manager 'change-detection "flac-taglib")
     (ini-set! ini 'manager 'dry-run #f)
     (ini-set! ini 'manager 'display-log #t)
     (ini-set! ini 'manager 'log-file ".flac-48khz-manager.log")
@@ -87,6 +89,7 @@
   (manager-config base-dir ini-file (default-state base-dir) log-file
                   (int-value (ini-get ini 'manager 'max-sample-rate 48000) 48000)
                   (string-downcase (string-value (ini-get ini 'manager 'hash-algorithm "sha256") "sha256"))
+                  (string-downcase (string-value (ini-get ini 'manager 'change-detection "flac-taglib") "flac-taglib"))
                   (bool-value (ini-get ini 'manager 'dry-run #f) #f)
                   (bool-value (ini-get ini 'manager 'display-log #t) #t)
                   (int-value (ini-get ini 'manager 'compression-level 5) 5)