diff --git a/ffmpeg-myth.scm b/ffmpeg-myth.scm
index a809c94..2cc7844 100755
--- a/ffmpeg-myth.scm
+++ b/ffmpeg-myth.scm
@@ -641,7 +641,7 @@
 
 (define* (mythtv-move-and-symlink-watched-files #:optional (files '()))
   (let ((watched (if (null? files) (mythconverg-execute+parse "select basename from recorded where watched=1 and (basename like '%.h264.ts' or basename like '%.mkv');") files)))
-    (mythtv-move+symlink-watched-files0 files)))
+    (mythtv-move+symlink-watched-files0 watched)))