Remove fixme.pl

news-update
Michael Spang 16 years ago
parent 918b2b9331
commit ec94ebab79
  1. 2
      events/Makefile
  2. 14
      events/fixme.pl
  3. 2
      media/Makefile
  4. 15
      media/fixme.pl

@ -3,4 +3,4 @@ INPUTS = index.xml old.xml
include ../default.mk
all:
perl fixme.pl
:

@ -1,14 +0,0 @@
#!/usr/bin/perl
open (IN , "ls -1|");
while (<IN>) {
chomp ($_);
#print $_;
$a = $_;
if ($_ =~ /\%3A/) {
$_ =~ s/\%3A/\:/;
`ln -s $a $_`;
print "ln -s $a $_\n";
}
#print "\n";
}
close (IN);

@ -4,7 +4,7 @@ SUBDIRS =
include ../default.mk
all:
perl fixme.pl
:

@ -1,15 +0,0 @@
#!/usr/bin/perl
open (IN , "ls -1|");
while (<IN>) {
chomp ($_);
print $_;
$a = $_;
$_ =~ s/\%20/\\ /g;
if ($_ =~ /\%3A/) {
$_ =~ s/\%3A/\:/;
}
`ln -s $a $_`;
print "ln -s $a $_\n";
#print "\n";
}
close (IN);
Loading…
Cancel
Save