summaryrefslogtreecommitdiff
path: root/playlist.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'playlist.lisp')
-rw-r--r--playlist.lisp20
1 files changed, 10 insertions, 10 deletions
diff --git a/playlist.lisp b/playlist.lisp
index c2350d1..d7b08f1 100644
--- a/playlist.lisp
+++ b/playlist.lisp
@@ -319,24 +319,24 @@
(pl-dur ctl) dur-elem
(display input) "none"
(display title-elem) "inline")
-
+
(set-on-blur
input
(thunk*
- (when (plusp (length (value input)))
- (update-playlist-title pl (value input))
- (setf (text title-elem) (value input)))
- (setf (display input) "none"
- (display title-elem) "inline")))
+ (when (plusp (length (value input)))
+ (update-playlist-title pl (value input))
+ (setf (text title-elem) (value input)))
+ (setf (display input) "none"
+ (display title-elem) "inline")))
(set-on-click
title-elem
(thunk*
- (setf (value input) (text title-elem)
- (display title-elem) "none"
- (display input) "inline")
+ (setf (value input) (text title-elem)
+ (display title-elem) "none"
+ (display input) "inline")
(focus input)))
-
+
(initialize-now-playing body)))))