diff GalaxyPath.pm @ 6:b7ed4ee33fb6 draft default tip

Deleted selected files

--- a/GalaxyPath.pm	Tue Dec 12 10:16:23 2017 -0500
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,19 +0,0 @@
-package GalaxyPath;
-
-use parent 'Config::IniFiles';
-
-sub _convert_path{
-	my ($path)=@_;
-	return $path if ($path=~/^\//);
-	return "$ENV{'MY_GALAXY_DIR'}/galaxy/$path";
-}
-
-sub my_path{
-    my $self = shift;
-    my ($section,$item)=@_;
-    defined $ENV{'MY_GALAXY_DIR'} || die 'no MY_GALAXY_DIR environment variable defined';
-    -e $ENV{'MY_GALAXY_DIR'} || die "$ENV{'MY_GALAXY_DIR'} path not found";
-    return join(',',map{_convert_path($_)}split/,/,$self->val($section,$item));
-}
- 
-1;