remove files which are unused since 2005

3 files changed, 0 insertions, 284 deletions

diff --git a/english/template/debian/card.wml b/english/template/debian/card.wml
deleted file mode 100644
index ad094d8a4ff..00000000000
--- a/english/template/debian/card.wml
+++ /dev/null
@@ -1,31 +0,0 @@
-
-<define-tag card endtag=required>
-<preserve name />
-<set-var %attributes />
-  <table width="100%" border="0" cellspacing="0" cellpadding="0">
-  <tr>
-  <td valign=top>
-    <table border="0" cellspacing="0" cellpadding="4">
-    <tr>
-    <th bgcolor="#000000" align=center>\
-      <big><strong><font color="#ffd400" face="$(SANS_SERIF_FONT:-Arial,Helvetica)">\
-# Not all languages use single-byte characters, so extra spacing between
-# the characters is accomplished using CSS.
-      <span style="letter-spacing: 0.2em"><get-var name /></span>\
-      </font></strong></big>\
-    </th></tr>
-    </table>
-  </td>
-  </tr>
-  <tr>
-  <td width=100% valign=top bgcolor="#000000">
-    <table width="100%" border="0" cellspacing="2" cellpadding="4">
-    <tr><td bgcolor="#ffffff">
-%body
-    </td></tr>
-    </table>
-  </td>
-  </tr>
-  </table>
-<restore name />
-</define-tag>
diff --git a/english/template/debian/legal.wml b/english/template/debian/legal.wml
deleted file mode 100644
index d5da5310686..00000000000
--- a/english/template/debian/legal.wml
+++ /dev/null
@@ -1,93 +0,0 @@
-# Copyright (c) 2004 by Frank Lichtenheld <djpig@debian.org>
-# After the example of the security template.
-
-#use wml::fmt::verbatim
-#use wml::debian::common_tags
-#use wml::debian::common_translation
-#use wml::debian::languages
-#use wml::debian::ctime
-#use wml::debian::submenu
-#use wml::debian::legal_tags
-
-<bind-gettext-domain domain="legal" />
-
-<define-tag legal whitespace="delete">
-	  <gettext domain="legal">License Information</gettext>
-</define-tag>
-
-<define-menu-item name="index">
-  <gettext domain="legal">DLS Index</gettext>
-</define-menu-item>
-
-<define-menu-item name="dfsg">
-  <gettext domain="legal">DFSG</gettext>
-</define-menu-item>
-
-<define-menu-item name="faq">
-  <gettext domain="legal">DFSG FAQ</gettext>
-</define-menu-item>
-
-<define-menu-item name="dlegal">
-  <gettext domain="legal">Debian-Legal Archive</gettext>
-</define-menu-item>
-
-
-
-# Start of the actual page
-
-#use wml::debian::basic title="<legal/> -- <pagetitle/>"
-
-<menu-item name="index" basename="./" />
-<menu-item name="dfsg" basename="$(HOME)/social_contract#guidelines" />
-<menu-item name="faq" basename="https://people.debian.org/~bap/dfsg-faq.html" />
-<menu-item name="dlegal" basename="https://lists.debian.org/debian-legal/" />
-
-
-<h1>\
-<ifeq "<license-version/>" ""
-# title string without version, on the form "dls-xxx - license name: status"
-"<: printf( "<gettext domain="legal">%s  &ndash; %s: %s</gettext>",
-  '<pagetitle/>', '<license-name/>', '<dls-result isfree="<isfree>"/>' ) :>"
-# title string with version, on the form "dls-xxx - license name, version: status"
-"<: printf( "<gettext domain="legal">%s  &ndash; %s, Version %s: %s</gettext>",
-  '<pagetitle/>', '<license-name/>', '<license-version/>', '<dls-result isfree="<isfree>"/>' ) :>" />\
-</h1>
-
-<h2>Debian License Summary</h2>
-
-<dl compact>
-<dt><gettext domain="legal">Date published</gettext>:</dt>
-	<dd><:= newsdate('<report_date/>') :></dd>
-<dt><gettext domain="legal">License</gettext>:</dt>
-	<dd><a href="<license-url/>"><license-name/></a></dd>
-<ifneq "<license-version/>" ""
-"<dt><gettext domain="legal">Version</gettext>:</dt>
-	<dd><license-version/></dd>" />
-<dt><gettext domain="legal">Summary</gettext>:</dt>
-	<dd><dls-result isfree="<isfree/>"/>
-<ifneq "<short-summary/>" "" "&ndash; <short-summary/>" />
-	</dd>
-<dt><gettext domain="legal">Justification</gettext>:</dt>
-	<dd><justification/></dd>
-<dt><gettext domain="legal">Discussion</gettext>:</dt>
-        <dd><url "<discussion-url/>" /></dd>
-<dt><gettext domain="legal">Original Summary</gettext>:</dt>
-<ifneq "<summary-url/>" ""
-  "     <dd><gettext domain="legal">The original summary by <summary-author/> can be found in the <a href="<summary-url/>">list archives</a>.</gettext></dd>"
-  "     <dd><gettext domain="legal">This summary was prepared by <summary-author/>.</gettext></dd>"
-/>
-<ifneq "<license-text-trans/>" "" "
-<dt><gettext domain="legal">License text (translated)</gettext>:</dt>
-	<dd><license-text-trans/></dd>
-"/>
-<dt><gettext domain="legal">License text</gettext>:</dt>
-	<dd>{#licensetext#}</dd>
-</dl>
-
-{#pre_footer#:
-<hrline/>
-
-<:= languages_footer() :>
-:#pre_footer#}
-
-{#licensetext#:
diff --git a/english/template/debian/legal_lists.wml b/english/template/debian/legal_lists.wml
deleted file mode 100644
index 9c4b67d35ea..00000000000
--- a/english/template/debian/legal_lists.wml
+++ /dev/null
@@ -1,160 +0,0 @@
-# Copyright (C) 2004 Frank Lichtenheld
-# derived from wml::debian::recent_list
-# $Id$
-
-#use wml::debian::ctime
-#use wml::debian::common_tags
-#use wml::debian::legal_tags
-#use wml::debian::openrecode
-
-<perl>
-
-use Encode;
-
-my ($listhead, $listfoot, $elemhead, $elemdate, $elemfoot, $elemrealfoot);
-
-sub get_alphabetical_list {
-
-    my ($isfree, $format) = @_;
-    my $eng_dir = "$(ENGLISHDIR)";
-    my $cur_dir = "legal/licenses";
-    my $match = "dls-.*";
-
-<protect pass="2">
-    if ($format =~ order) {
-	$listhead = '<ol>';
-	$listfoot = '</ol>';
-	$elemhead = '<li>';
-	$elemfoot = '- ';
-	$elemrealfoot = '</li>';
-    } elsif ($format =~ bullet) {
-	$listhead = '<ul>';
-	$listfoot = '</ul>';
-	$elemhead = '<li>';
-	$elemfoot = '- ';
-	$elemrealfoot = '</li>';
-    } elsif ($format =~ list) {
-	$listhead = '<dl>';
-	$listhead = '<dl compact>' if $format eq "cdeflist";
-	$listfoot = '</dl>';
-	$elemhead = '<dt>';
-	$elemfoot = '</dt><dd>';
-	$elemrealfoot = '</dd>';
-    } elsif ($format =~ table) {
-	$listhead = '<table>';
-	$listfoot = '</table>';
-	$elemhead = '<tr><td>';
-	$elemdate = '</td><td>';
-	$elemfoot = '';
-	$elemrealfoot = '</td></tr>';
-    } else {
-	$listhead = '';
-	$listfoot = '';
-	$elemhead = '';
-	$elemfoot = '- ';
-	$elemrealfoot = '';
-    }
-</protect>
-
-      opendir DIR, "$eng_dir/$cur_dir" or die "couldn't open directory: $!";
-      my @files = grep { /^$match\.wml$/ 
-         && -f "$eng_dir/$cur_dir/$_" 
-        } readdir(DIR);
-      closedir DIR;
-
-      @files = sort {$a cmp $b} @files;
-    
-      #warn "files: " . join " ", @files; warn "\n";
-      #warn "eng_dir=$eng_dir cur_dir=$cur_dir
-      #warn isfree=$isfree format=$format match=$match\n";
-    
-      my %str = grab_titles( $isfree, $eng_dir, $cur_dir, $match, @files );
-      
-      $str{head} = "$listhead";
-      $str{foot} = "$listfoot";
-
-      return %str;
-}
-
-# grab_titles is an auxiliary function to get_recent_list, which actually
-# does the real work.
-sub grab_titles {
-    my ( $isfree, $eng_dir, $cur_dir, $match, @files) = @_;
-    my ( %str_by_letter, %str );
-    
-    foreach $file (@files) {
-	(my $trans_title = $file) =~ s/wml/title/;
-	my $base = $1 if ($file =~ m|^($match).wml|);
-	#warn "$file -> $base\n";
-        
-	# read file in
-	my $fh = openrecode($file, $trans_title, "$eng_dir/$cur_dir/$file")
-	    or die "couldn't open $eng_dir/$cur_dir/$file: $!\n";
-	my $content;
-	<protect pass=2>
-	{
-	    local $/;
-	    $content = <$fh>;
-	}
-	</protect>
-        close $fh;
-
-	my ($title, $just);
-        open DATAFILE, "$eng_dir/$cur_dir/$base.data" 
-            or do {
-                warn "couldn't open $eng_dir/$cur_dir/$base.data: $!\n";
-                next;
-            };
-        <protect pass=2>
-        my ( $free, $l_name, $rdate );
-        foreach my $l (Encode::decode_utf8(<DATAFILE>)) {
-            if ($l =~ /^<define-tag pagetitle>(.*)<\/define-tag>/) 
-            { $title = Encode::encode_utf8(qq/$1/); }
-            if ($l =~ /^<define-tag license-name>(.*)<\/define-tag>/) 
-            { $l_name = Encode::encode_utf8(qq/$1/); }
-            elsif ($l =~ /^<define-tag report_date>(.*)<\/define-tag>/) 
-            { $rdate = Encode::encode_utf8(qq/$1/); }
-            elsif ($l =~ /^<define-tag isfree>(.*)<\/define-tag>/) 
-            { $free = Encode::encode_utf8(qq/$1/); }
-        }
-        </protect>
-	close DATAFILE;
-        if ($isfree && ($free ne $isfree)) { next; }
-        $rdate = newsdate($rdate);
-        if ($free eq 'yes') {
-            $free = '<dls-result isfree="yes" />';
-        } elsif ($free eq 'no') {
-            $free = '<dls-result isfree="no" />';
-        } elsif ($free eq 'non-dist') {
-            $free = '<dls-result isfree="non-dist" />';
-        }
-        $str{$l_name} = "$elemhead<tt>[$rdate]</tt> "
-            ."<strong><a href=\"$base\">$title</a></strong>$elemfoot "
-            ."$l_name &ndash; $free<br />$elemrealfoot\n";
-    } # for each file
-    my $fl = '';
-    foreach (sort keys %str) {
-        my $fl = uc( substr( $_, 0, 1) );
-        if ($fl !~ /^\w$/) { $fl = '_'; }
-        $str_by_letter{$fl} .= $str{$_};
-    }
-    return %str_by_letter;
-}
-
-# iso2stamp converts a date in ISO format (YYYY-MM-DD) to an
-# unix timestamp for 23:59:59 on the specified day
-# Input: $time - String with the ISO date
-# Output: integer timestamp
-sub iso2stamp {
-    my $time = shift;
-
-    if ($time =~ /undated/) {
-	return 0;
-    }
-    my ($year, $month, $day) = ($time =~ /(\d{4})-(\d{1,2})-(\d{1,2})/);
-    unless ($year && $month && $day) { warn "not an ISO date: $time\n"; }
-    
-    return timegm( 59, 59, 23, $day, $month-1, $year);
-}
-
-</perl>