From 18dd8b7ce485ed2d13d25877455bd07871f9f8d4 Mon Sep 17 00:00:00 2001
From: Martin Gasbichler <gasbichl@informatik.uni-tuebingen.de>
Date: Thu, 20 Feb 2003 22:11:42 +0000
Subject: [PATCH] Added predicate.

---
 scsh/afs/interfaces.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/scsh/afs/interfaces.scm b/scsh/afs/interfaces.scm
index a9835d5..52ae7a7 100644
--- a/scsh/afs/interfaces.scm
+++ b/scsh/afs/interfaces.scm
@@ -1,6 +1,7 @@
 (define-interface afs-fs-interface
   (export
    ((afs-permission afs-permissions) :syntax)
+   afs-permissions?
    all-afs-permissions
    make-afs-permissions
    afs-permissions<=?