diff --git a/sugar/unstable/stub.rkt b/sugar/unstable/stub.rkt
index 0265841..43d04b0 100644
--- a/sugar/unstable/stub.rkt
+++ b/sugar/unstable/stub.rkt
@@ -35,5 +35,5 @@
 (define-syntax (unfinished stx)
   (syntax-case stx ()
     [(_)
-     (with-syntax ([ID-UNFINISHED (format-id stx "~a:~a:~a" (syntax-source stx) (syntax-line stx) (syntax->datum #'unfinished))])
+     (with-syntax ([ID-UNFINISHED (format-id stx "~a:~a:~a" (path->string (syntax-source stx)) (syntax-line stx) (syntax->datum #'unfinished))])
        #'(error 'ID-UNFINISHED))]))
\ No newline at end of file