Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

New release 316

  • Loading branch information...
commit fcc0c21747aa085ef28fd4f7fa364f0ea573bc62 1 parent 7a81c38
Klink authored
View
2  LATESTIS
@@ -1 +1 @@
-315
+316
View
6 debian/changelog
@@ -1,3 +1,9 @@
+stalag13-utils (2.316-20120330) unstable; urgency=low
+
+ * Upstream release
+
+ -- Mathieu Roy <klink@bender.stalag13.ici> Fri, 30 Mar 2012 15:23:47 +0200
+
stalag13-utils (2.315-20120330) unstable; urgency=low
* Upstream release
View
2  usr/local/bin/stalag13-cleanup-music-directory-01-identify.pl
@@ -81,7 +81,7 @@
# find out suffix, ignore file if none found
my $suffix = 0;
my $realfile;
- if ($file =~ /^(.*)(\.[^.]*)$/) { $suffix = $2; $realfile = $1; }
+ if ($file =~ /^(.*)(\.[^.]*)$/) { $suffix = lc($2); $realfile = $1; }
next unless $suffix && $realfile;
next unless ($suffix eq ".ogg" or $suffix eq ".mp3" or $suffix eq ".flac");
View
2  usr/local/bin/stalag13-cleanup-music-directory-02-rename.pl
@@ -93,7 +93,7 @@
# find out suffix, ignore file if none found
my $suffix = 0;
my $realfile;
- if ($file =~ /^(.*)(\.[^.]*)$/) { $suffix = $2; $realfile = $1; }
+ if ($file =~ /^(.*)(\.[^.]*)$/) { $suffix = lc($2); $realfile = $1; }
next unless $suffix && $realfile;
# if image, simply move it
Please sign in to comment.
Something went wrong with that request. Please try again.