diff --git a/standalone_output.ly b/standalone_output.ly
index eab2918..6f100ac 100644
--- a/standalone_output.ly
+++ b/standalone_output.ly
@@ -37,7 +37,7 @@ TEXT = \markuplist {
         \context {
           \Score
           % Tempo des midi files
-          tempoWholesPerMinute = #(ly:make-moment midiQuarterNoteSpeed 4)
+          tempoWholesPerMinute = #(/ midiQuarterNoteSpeed 4)
         }
       }
     }#})
diff --git a/swing_style.ly b/swing_style.ly
index 4c45f0c..b406947 100644
--- a/swing_style.ly
+++ b/swing_style.ly
@@ -59,7 +59,7 @@ swingMusic =
         (partial-duration-length (car es))
         (if (ly:music? e)
           (if (and (eq? name 'ContextSpeccedMusic) (eq? (ly:music-property e 'name) 'PartialSet))
-            (ly:duration-length (ly:music-property e 'duration))
+            (ly:duration->moment (ly:music-property e 'duration))
             (if (eq? name 'NoteEvent)
               ZERO-MOMENT
               (partial-duration-length e)