#!/usr/bin/perl

# $Id: test-permissions,v 1.4 1999/11/13 17:44:32 phil Exp $
# Copyright (c) 1998 Philip Hands <phil@hands.com>
# This program is distributed under the terms of the GPL.

use Debian::DebianTest ;

runtest("/tmp", sub { check_perms("/tmp", 041777) } ) ;
