X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=helm%2Finterface%2Furis_of_filenames.pl;fp=helm%2Finterface%2Furis_of_filenames.pl;h=0000000000000000000000000000000000000000;hp=019730bee5b39a948d79308e886f8e23bb735d09;hb=869549224eef6278a48c16ae27dd786376082b38;hpb=89262281b6e83bd2321150f81f1a0583645eb0c8

diff --git a/helm/interface/uris_of_filenames.pl b/helm/interface/uris_of_filenames.pl
deleted file mode 100755
index 019730bee..000000000
--- a/helm/interface/uris_of_filenames.pl
+++ /dev/null
@@ -1,17 +0,0 @@
-#!/usr/bin/perl
-
-while(<STDIN>) {
-   chomp;
-   split / /;
-   for (@_) {
-      $GZSUFF = "";
-      if (/.gz$/)
-       { s/.gz$//; $GZSUFF = " gz" if ($ARGV[0] == "-gz"); }
-      if (/.*\.(con|var|ind)(\.types)?\.xml/)
-       { s/\./cic:/; }
-      elsif (/.*\.theory\.xml/)
-       { s/\./theory:/; }
-      s/\.xml//;
-      print $_.$GZSUFF."\n";
- }
-}