diff options
| -rw-r--r-- | app-misc/filer/ChangeLog | 6 | ||||
| -rw-r--r-- | app-misc/filer/filer-0.0.12.ebuild | 5 | ||||
| -rw-r--r-- | app-misc/filer/files/filer-0.0.12-trash.patch | 49 |
3 files changed, 58 insertions, 2 deletions
diff --git a/app-misc/filer/ChangeLog b/app-misc/filer/ChangeLog index a3d45792287c..51653b583628 100644 --- a/app-misc/filer/ChangeLog +++ b/app-misc/filer/ChangeLog @@ -1,6 +1,10 @@ # ChangeLog for app-misc/filer # Copyright 2000-2006 Gentoo Foundation; Distributed under the GPL v2 -# $Header: /var/cvsroot/gentoo-x86/app-misc/filer/ChangeLog,v 1.20 2006/07/06 13:01:35 ian Exp $ +# $Header: /var/cvsroot/gentoo-x86/app-misc/filer/ChangeLog,v 1.21 2006/09/06 14:39:34 mcummings Exp $ + + 06 Sep 2006; Michael Cummings <mcummings@gentoo.org> + +files/filer-0.0.12-trash.patch, filer-0.0.12.ebuild: + Patch for deleting dirs, worked with Jens (author) on this, closes bug 126514. 06 Jul 2006; Christian Hartmann <ian@gentoo.org> -filer-0.0.6.ebuild, -filer-0.0.10.ebuild, filer-0.0.12.ebuild: diff --git a/app-misc/filer/filer-0.0.12.ebuild b/app-misc/filer/filer-0.0.12.ebuild index 6339ac1c284b..2b23daa2054a 100644 --- a/app-misc/filer/filer-0.0.12.ebuild +++ b/app-misc/filer/filer-0.0.12.ebuild @@ -1,6 +1,8 @@ # Copyright 1999-2006 Gentoo Foundation # Distributed under the terms of the GNU General Public License v2 -# $Header: /var/cvsroot/gentoo-x86/app-misc/filer/filer-0.0.12.ebuild,v 1.6 2006/07/06 13:01:35 ian Exp $ +# $Header: /var/cvsroot/gentoo-x86/app-misc/filer/filer-0.0.12.ebuild,v 1.7 2006/09/06 14:39:34 mcummings Exp $ + +inherit eutils DESCRIPTION="Small file-manager written in perl" HOMEPAGE="http://blog.perldude.de/archives/category/programming/filer/" @@ -29,6 +31,7 @@ DEPEND="sys-apps/findutils" src_unpack() { unpack ${A} find ${S} -type d -name .svn | xargs rm -rf + cd ${S}; epatch ${FILESDIR}/filer-0.0.12-trash.patch } src_compile() { diff --git a/app-misc/filer/files/filer-0.0.12-trash.patch b/app-misc/filer/files/filer-0.0.12-trash.patch new file mode 100644 index 000000000000..655427f1d638 --- /dev/null +++ b/app-misc/filer/files/filer-0.0.12-trash.patch @@ -0,0 +1,49 @@ +diff -Naurp filer-0.0.12/Filer/Config.pm filer-0.0.12.new/Filer/Config.pm +--- filer-0.0.12/Filer/Config.pm 2005-07-03 14:48:23.000000000 -0400 ++++ filer-0.0.12.new/Filer/Config.pm 2006-09-06 10:28:03.000000000 -0400 +@@ -22,7 +22,15 @@ use warnings; + sub new { + my ($class,$side) = @_; + my $self = bless {}, $class; +- $self->{cfg_home} = (new File::BaseDir)->xdg_config_home . "/filer"; ++ ++ my $xdg_config_home = File::BaseDir::xdg_config_home; ++ my $xdg_data_home = File::BaseDir::xdg_data_home; ++ ++ $self->{cfg_home} = "$xdg_config_home/filer"; ++ ++ if (! -e $xdg_config_home) { ++ mkdir($xdg_config_home); ++ } + + # move old config directory if it exists: + if (-e "$ENV{HOME}/.filer/") { +@@ -30,14 +38,24 @@ sub new { + rename("$ENV{HOME}/.filer", $self->{cfg_home}); + } + +- if (! -e File::BaseDir::xdg_config_home) { +- mkdir(File::BaseDir::xdg_config_home); +- } +- + if (! -e $self->{cfg_home}) { + mkdir($self->{cfg_home}); + } + ++ if (! -e $xdg_data_home) { ++ mkdir($xdg_data_home); ++ } ++ ++ my $trashdir = $xdg_data_home . "/Trash"; ++ my $trashdir_files = "$trashdir/files"; ++ my $trashdir_info = "$trashdir/info"; ++ ++ if (! -e $trashdir) { ++ mkdir($trashdir); ++ mkdir($trashdir_files); ++ mkdir($trashdir_info); ++ } ++ + if (! -e "$self->{cfg_home}/config") { + my $cfg = { + PathLeft => $ENV{HOME}, |