diff --git a/tools/check-glade-visible b/tools/check-glade-visible deleted file mode 100755 index 353f5a8e2..000000000 --- a/tools/check-glade-visible +++ /dev/null @@ -1,67 +0,0 @@ -#!/usr/bin/perl -w -# -# Gnumeric -# -# Copyright (C) 2001 Morten Welinder. -# -# This program is free software; you can redistribute it and/or -# modify it under the terms of the GNU General Public License as -# published by the Free Software Foundation; either version 2 of the -# License, or (at your option) any later version. -# -# This library is distributed in the hope that it will be useful, -# but WITHOUT ANY WARRANTY; without even the implied warranty of -# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -# General Public License for more details. -# -# You should have received a copy of the GNU General Public License -# along with this library; if not, write to the Free Software -# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. -# -# Author: Morten Welinder - -use strict; - -my $exitcode = 0; - -die "$0: must be run from top-level directory.\n" - unless (-r "configure.in" || -r "configure.ac") && -r 'ChangeLog'; - -my %exceptions = - ( - ); - - -my @files; -{ - local (*FIND); - open (*FIND, "find . '(' -name \*.glade -type f -print ')' -o '(' -type d '(' -name CVS -o -name intl -o -name macros ')' -prune ')' |") - or die "$0: cannot execute find: $!\n"; - foreach my $filename () { - chomp $filename; - $filename =~ s|^\./||; - next if $exceptions{$filename}; - push @files, $filename; - } - close (*FIND); -} - - -FILE: - foreach my $filename (@files) { - local (*GREP); - open (*GREP, "grep -c '^ True' '$filename' /dev/null 2>/dev/null |") - or die "$0: cannot execute grep: $!\n"; - while () { - chomp; - last if m|^/dev/null:|; - if (!/:0$/) { - print STDERR "File `$filename' sets the visible property to True.\n"; - $exitcode = 1; - next FILE; - } - } - close (*GREP); - } - -exit $exitcode; diff --git a/tools/run-tests b/tools/run-tests deleted file mode 100755 index ac020cd33..000000000 --- a/tools/run-tests +++ /dev/null @@ -1,4 +0,0 @@ -#!/bin/sh -for test in `ls tests/test* | grep -v '\.'`; do - $test -done