aboutsummaryrefslogtreecommitdiff
path: root/bin/psycamp
diff options
context:
space:
mode:
authorpsyc://loupsycedyglgamf.onion/~lynX <ircs://psyced.org/youbroketheinternet>2016-08-10 15:28:58 +0000
committerpsyc://loupsycedyglgamf.onion/~lynX <ircs://psyced.org/youbroketheinternet>2016-08-10 15:28:58 +0000
commite503c6b40fb5480090bdc6f29841e59a5212a3d7 (patch)
treec3662fdedf5cf66be94b08ba73bf0ba7346eecf0 /bin/psycamp
parent94c6660f0ac6c3420c496a0ddb67613cb7e74aff (diff)
downloadperlpsyc-e503c6b40fb5480090bdc6f29841e59a5212a3d7.tar.gz
perlpsyc-e503c6b40fb5480090bdc6f29841e59a5212a3d7.zip
fixed -x option
Diffstat (limited to 'bin/psycamp')
-rwxr-xr-xbin/psycamp8
1 files changed, 6 insertions, 2 deletions
diff --git a/bin/psycamp b/bin/psycamp
index ecdd32e..49ffd53 100755
--- a/bin/psycamp
+++ b/bin/psycamp
@@ -262,8 +262,12 @@ X
262 &load unless $opt_x; 262 &load unless $opt_x;
263 system "$ENV{EDITOR} $playlist;clear" if $opt_e; 263 system "$ENV{EDITOR} $playlist;clear" if $opt_e;
264 } 264 }
265 exec '$has_mplayer "`cat $playlist`"' if $opt_x; 265 if ($opt_x) {
266 #exec "mpg123 --remain --aggressive -@ $playlist" if $opt_x; 266 # "mpg123 --remain --aggressive -@ $playlist"
267 my $exec = $has_mplayer .' -fs -zoom -playlist '. $playlist;
268 print STDERR "\n$exec\n";
269 exec $exec;
270 }
267 271
268 print STDERR BOLD, YELLOW, "binding to $opt_b ...\n", RESET if DEBUG & 16 && $opt_b; 272 print STDERR BOLD, YELLOW, "binding to $opt_b ...\n", RESET if DEBUG & 16 && $opt_b;
269 bind_uniform( $opt_b || $UNI ); 273 bind_uniform( $opt_b || $UNI );