diff --git a/scripts/playvid.ros b/scripts/playvid.ros index 57818e3..5416c6e 100755 --- a/scripts/playvid.ros +++ b/scripts/playvid.ros @@ -17,7 +17,7 @@ exec ros -Q -- $0 "$@" (nth (random (length dir) (make-random-state t)) dir)))) (basename (pathname-name vidfile))) (format t "playing video: ~a~%" basename) - (uiop:run-program (list "mpv" (file-namestring vidfile)) + (uiop:run-program (list "mpv" (uiop:native-namestring vidfile)) :input :interactive :error-output :interactive :output :interactive)