diff --git a/libsrc/atari/ucase_fn.s b/libsrc/atari/ucase_fn.s
index c52de8ef7..2d609bb5c 100644
--- a/libsrc/atari/ucase_fn.s
+++ b/libsrc/atari/ucase_fn.s
@@ -82,12 +82,15 @@ loop2:	lda	(ptr4),y
 
 	inc	tmp3		; no, prepend "D:"
 	inc	tmp3		; adjust stack size used
-	ldy	#2
+	ldy	#3
 	jsr	subysp		; adjust stack pointer
-	ldy	#1
+	ldy	#2
 	lda	#':'
 	sta	(sp),y		; insert ':'
 	dey
+	lda	#'0' + DEFAULT_DEVICE 
+	sta	(sp),y		; insert device number
+	dey
 	lda	#'D'
 	sta	(sp),y		; insert 'D'
 hasdev2: