diff options
Diffstat (limited to 'model.lisp')
| -rw-r--r-- | model.lisp | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -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))))) |