diff --git a/ffmpeg-myth.scm b/ffmpeg-myth.scm
index 991823a..c8bbd9d 100755
--- a/ffmpeg-myth.scm
+++ b/ffmpeg-myth.scm
@@ -340,7 +340,7 @@
 	 (out-file (simple-format #f "~a/~a.~a" working-directory rootname transcoded-file-ending))
 	 (m-d (mythtv-recorded-table->metadata rec))
 	 (cut-times (myth-convert-i-frame-indices-to-times (recording-retain-list rec) (recording-i-frame-info rec)))
-	 (seek-fn (lambda(c) (simple-format #f " -ss ~a -to ~a -i '~a'" (car c) (cdr c) in-file)))
+	 (seek-fn (lambda(c) (simple-format #f " -ss ~a -t ~a -i '~a'" (car c) (- (cdr c) (car c)) in-file)))
 	 (concat-info (ffmpeg-outstreams-templates rec max-streams))
 	 (instreams (string-join (map (car concat-info) cut-times) " "))
 	 (outstreams (cdr concat-info))