9 lines
199 B
Text
Executable file
9 lines
199 B
Text
Executable file
#!/usr/bin/scsh -s
|
|
!#
|
|
|
|
(run (mpc clear))
|
|
|
|
(for-each (lambda (album)
|
|
(run (mpc findadd album ,album)))
|
|
(run/strings (pipe (mpc list album)
|
|
(shuf))))
|