1 files changed, 3 insertions, 3 deletions
diff --git a/model.lisp b/model.lisp
index 65968cb..dcaf780 100644
--- a/model.lisp
+++ b/model.lisp
@@ -182,6 +182,6 @@
 (defun update-track-info (track new-artist new-album new-title)
   (with-transaction ()
     (with-slots (artist album title) track
-      (setf artist new-artist
-	    album new-album
-	    title new-title))))
+      (setf artist (if (equal "" new-artist) nil new-artist)
+	    album (if (equal "" new-album) nil new-album)
+	    title (if (equal "" new-title) nil new-title)))))