From fa83599987fc8aed33c3cfc25eaec1fa371b606c Mon Sep 17 00:00:00 2001
From: Neal Gompa <ngompa13@gmail.com>
Date: Sun, 30 Jul 2017 18:50:22 -0400
Subject: Remove find-lang.pl in favor of using upstream find-lang.sh

---
 tests/findlang.pl | 44 --------------------------------------------
 tests/findlang.sh | 12 ------------
 2 files changed, 56 deletions(-)
 delete mode 100755 tests/findlang.pl
 delete mode 100755 tests/findlang.sh

(limited to 'tests')

diff --git a/tests/findlang.pl b/tests/findlang.pl
deleted file mode 100755
index d601728..0000000
--- a/tests/findlang.pl
+++ /dev/null
@@ -1,44 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use warnings;
-
-use Test::More qw(no_plan);
-
-my $pwd = `pwd`;
-chomp($pwd);
-my $testarbo = "$pwd/find-lang-root";
-
-
-my %files = (
-    # file => [ lang, is_%dir ]
-    '/usr/share/man/fr' => [ 'fr', 1 ],
-    '/usr/share/man/fr/man1' => [ 'fr', 1 ],
-    '/usr/share/man/fr/man1/lang.1.*' => [ 'fr', 0 ],
-    '/usr/share/locale/pt_BR' => [ 'pt_BR', 1 ],
-    '/usr/share/gnome/help/lang/pt_BR' => [ 'pt_BR', 1 ],
-    '/usr/share/gnome/help/lang/pt_BR/any.html' => [ 'pt_BR', 0 ],
-    '/usr/share/gnome/help/lang/en_GB' => [ 'en_GB', 1 ],
-    '/usr/share/gnome/help/lang/en_GB/any.html' => [ 'en_GB', 0 ],
-    '/usr/share/gnome/help/lang' => [ '', 1 ],
-    '/usr/share/locale/pt_BR/LC_MESSAGES' => [ 'pt_BR', 1 ],
-    '/usr/share/locale/pt_BR/LC_MESSAGES/lang.mo' => [ 'pt_BR', 0 ],
-);
-
-system("/usr/bin/perl find-lang.pl $testarbo lang --with-man --with-gnome") and die "can't run find-lang $@";
-
-open(my $h, '<', 'lang.lang') or die "can't open lang.lang";
-
-while (my $line = <$h>) {
-    chomp($line);
-    $line =~ /svn/ and next;
-    my ($file) = $line =~ / ([^ ]+)$/;
-    my ($lang) = $line =~ /%lang\(([^\)]+)\)/;
-    $lang ||= '';
-    my $dir = $line =~ /%dir/;
-    $dir ||= 0;
-    print STDERR "$file\n";
-    is($lang, $files{$file}[0], "lang is find");
-    is($dir, $files{$file}[1], "%dir is properly set if need");
-}
-
diff --git a/tests/findlang.sh b/tests/findlang.sh
deleted file mode 100755
index fb7110a..0000000
--- a/tests/findlang.sh
+++ /dev/null
@@ -1,12 +0,0 @@
-#!/bin/sh
-
-rm -fr find-lang-root
-for file in \
-    find-lang-root/usr/share/man/fr/man1/lang.1.lzma \
-    find-lang-root/usr/share/locale/pt_BR/LC_MESSAGES/lang.mo \
-    find-lang-root/usr/share/gnome/help/lang/pt_BR/any.html \
-    find-lang-root/usr/share/gnome/help/lang/en_GB/any.html
-do install -D Makefile $file
-done
-
-exec perl tests/findlang.pl
-- 
cgit v1.2.1