Changeset 48 in flacrip for trunk

Timestamp:

07/18/16 15:29:42 (8 years ago)

Author:

peter

Message:

Default the --directory to the current directory.

Then, if the --all flag is set, add the ARTIST.DATE.ALBUM directory to the
end of the base directory given by --directory.

File:

• trunk/flactrack (modified) (3 diffs)

trunk/flactrack

@@ -16 +16 @@
 use MusicBrainz;
 use Text::Unidecode;
+use Cwd;
 
 # default to using tags
@@ -36 +37 @@
 $TYPE ||= 'mp3';
 
-# default the directory to be named like the flac file
-($DIRECTORY ||= $FLAC_FILE) =~ s/\.flac$//;
+# default to the current directory
+$DIRECTORY ||= cwd;
 
 my $flac = Audio::FLAC::Header->new($FLAC_FILE) or die "Can't read FLAC header from $FLAC_FILE\n";
@@ -59 +60 @@
     }
     exit unless $info;
+}
 
-    # if we have metadata, change the directory name to ARTIST.DATE.ALBUM, so it will sort nicely
-    my $base_dir = (splitpath($DIRECTORY))[1];
+if ($ALL) {
+    # if we are converting an entire album file, create a directory to hold the mp3s
+    # name the directory ARTIST.DATE.ALBUM, so it will sort nicely
+    my $base_dir = $DIRECTORY;
     my $album_dir = join('.', map { to_filename($_) } @{$info}{qw{ALBUMARTISTSORT ORIGINALDATE ALBUM}});
     # need to append "disc#" if this is a multidisc album