diff options
author | Rasmus Steinke <rasi@xssn.at> | 2017-08-12 00:51:59 +0200 |
---|---|---|
committer | Rasmus Steinke <rasi@xssn.at> | 2017-08-12 00:51:59 +0200 |
commit | 34cadbba822a82840e4ef6807499b24eb0c086fa (patch) | |
tree | f9c448c2ca957a672473751fe26421586f68aa98 | |
parent | 22cd0c822489390c3685a8aff17824e054ccc295 (diff) | |
download | perl-app-clerk-34cadbba822a82840e4ef6807499b24eb0c086fa.tar.gz perl-app-clerk-34cadbba822a82840e4ef6807499b24eb0c086fa.tar.xz |
remove debug
-rwxr-xr-x | clerk | 3 |
1 files changed, 0 insertions, 3 deletions
@@ -162,7 +162,6 @@ sub help { } sub backend_call { - $Devel::Trace =1; my ($in, $fields, $random) = @_; my $input; my $out; @@ -266,7 +265,6 @@ sub random { } sub do_action { - $Devel::Trace =1; my ($in, $context) = @_; my @action_items = ("Add\n", "Replace\n"); my $action = backend_call(\@action_items); @@ -357,7 +355,6 @@ sub formatted_playlists { } sub list_db_entries_for { - $Devel::Trace =1; my ($kind) = @_; die "Wrong kind" unless any {; $_ eq $kind} qw/Albums Latest Tracks/; |