From fc9b6181bb00dc015c93c6cb7acf2190d9dea4c7 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 6 Jan 2003 16:21:54 +0000 Subject: fix printerdrake regarding gimp configuration --- perl-install/printer/gimp.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'perl-install/printer/gimp.pm') diff --git a/perl-install/printer/gimp.pm b/perl-install/printer/gimp.pm index cd88df58f..b3cfe8f1e 100644 --- a/perl-install/printer/gimp.pm +++ b/perl-install/printer/gimp.pm @@ -230,11 +230,11 @@ sub findconfigfiles { next if -f $dir && ! -d $dir; if (! -d "$::prefix$dir") { eval { mkdir_p("$::prefix$dir") } or next; - set_permissions($dir, "$uid.$gid") or next; + run_program::rooted($::prefix, "/bin/chown", "$uid.$gid", $dir) or next; } if (! -f "$::prefix$homedir/$file") { eval { output("$::prefix$homedir/$file", "#PRINTRCv1 written by GIMP-PRINT 4.2.2 - 13 Sep 2002\n") } or next; - set_permissions("$homedir/$file", "$uid.$gid") or next; + run_program::rooted($::prefix, "/bin/chown", "$uid.$gid", "$homedir/$file") or next; } push @filestotreat, "$homedir/$file"; } -- cgit v1.2.1