← Back to branch summary

~ubuntu-branches/debian/wheezy/netatalk/wheezy

« back to all changes in this revision

Viewing changes to contrib/shell_utils/apple_rm.in

  • Committer: Bazaar Package Importer
  • Author(s): Jonas Smedegaard
  • Date: 2011-06-05 21:04:21 UTC
  • mfrom: (1.1.10 upstream)
  • Revision ID: james.westby@ubuntu.com-20110605210421-19gag2srevj0ocxh
Tags: 2.2~beta4-1
http://bugs.debian.org/606005
http://bugs.debian.org/621413
http://bugs.debian.org/628119
http://bugs.debian.org/621849
* New upstream release.
  + Fixes "Internal Error" after ad_open on sparc.
    Closes: bug#606005. Thanks to Alfredo Sola.
* Adjust references to unofficial packages in README.Debian.
* Use dversionmangle (not uversionmangle) in watch file. Fix add
  leading dash (-) to upstream version in mangling.
* Update patches:
  + Drop patches 107 and 294 (Zeroconf support): Implemented
    (differently) upstream now.
  + Drop patches 109 and 112 (avoid broken XFS linkage) obsolete.
  + Drop patch 200 (hostname resolving): adopted upstream.
  + Refresh patch 205.
* Rewrite copyright file using draft 174 of DEP-5 format.
* Build-depend on and recommend unversioned (i.e. default) BerkeleyDB
  packages.
  Closes: bug#621413. Thanks to Ondřej Surý.
  Simplify suggestions on older versioned BerkeleyDB packages.
* Stop installing some documentation dropped upstream, and let CDBS
  automagically handle some of the remains.
* Update control file:
  + Bump policy compliance to standards-version 3.9.2.
  + Shorten Vcs-* URLs.
* Add patches 115 and (for automade file) 214 to avoid installing
  unneeded /default dir.
  Closes: bug#628119. Thanks to Russell Muetzelfeldt and Luk Claes.
* Don't ship .la files. Closes: bug#621849. Thanks to Andreas Metzler
  and Luk Claes.
* Stop renaming afile and achfile, dropped upstream.
* Explicitly enable DDP (AppleTalk), now disabled by default.
* Enable Zeroconf, should be stable now.
* Simplify package relations:
  + Drop (build-)dependency fallback unneeded even for oldstable.

Show diffs side-by-side

added added

removed removed

Lines of Context:
contrib/shell_utils/apple_rm.in
1
 
#!@PERL@
2
 
# 
3
 
# $Id: apple_rm.in,v 1.1 2002-01-17 05:59:25 srittau Exp $
4
 
 
5
 
$USAGE = <<USAGE;
6
 
Usage: $0 filename ...
7
 
Do an apple remove, remove the resource fork as well
8
 
USAGE
9
 
 
10
 
die $USAGE if @ARGV < 1;
11
 
 
12
 
foreach $path (@ARGV) {
13
 
    if (!-f $path) {
14
 
        print STDERR "file $path does not exist\n";
15
 
        die $USAGE;
16
 
    }
17
 
 
18
 
    ($dir, $file) = &split_dir_file($path);
19
 
 
20
 
    $cmd = "rm '$path'";
21
 
    system $cmd || die "error executing $cmd";
22
 
    
23
 
    $cmd = "rm '$dir/.AppleDouble/$file'";
24
 
    system $cmd || die "error executing $cmd";
25
 
}
26
 
 
27
 
# split a file path into a directory and file name.
28
 
sub split_dir_file {
29
 
    my $path = shift;
30
 
 
31
 
    @path_elems = split(/\//, $path);
32
 
 
33
 
    my $file = pop(@path_elems);
34
 
    my $dir;
35
 
    if (!@path_elems) {
36
 
        $dir = '.';
37
 
    } else {
38
 
        $dir = join('/', @path_elems);
39
 
    }
40
 
 
41
 
    $dir, $file;
42
 
}