/[radius]/radius/radiusd/testsuite/raddb/acct.scm.in
ViewVC logotype

Diff of /radius/radiusd/testsuite/raddb/acct.scm.in

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.1 by gray, Thu Dec 19 16:53:38 2002 UTC revision 1.2 by gray, Thu May 29 15:50:28 2003 UTC
# Line 1  Line 1 
1  ;;;; -*- scheme -*-  ;;;; -*- scheme -*-
2  ;;;; This file is part of GNU RADIUS testsuite.  ;;;; This file is part of GNU Radius testsuite.
3  ;;;; Copyright (C) 2001, Sergey Poznyakoff  ;;;; Copyright (C) 2001,2003 Sergey Poznyakoff
4  ;;;;  ;;;;
5  ;;;; This file is free software; as a special exception the author gives  ;;;; This file is free software; as a special exception the author gives
6  ;;;; unlimited permission to copy and/or distribute it, with or without  ;;;; unlimited permission to copy and/or distribute it, with or without
7  ;;;; modifications, as long as this notice is preserved.  ;;;; modifications, as long as this notice is preserved.
8  ;;;;  ;;;;
9  ;;;; This program is distributed in the hope that it will be useful, but  ;;;; GNU Radius is distributed in the hope that it will be useful, but
10  ;;;; WITHOUT ANY WARRANTY, to the extent permitted by law; without even the  ;;;; WITHOUT ANY WARRANTY, to the extent permitted by law; without even the
11  ;;;; implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  ;;;; implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
12    
13  (define radius-acct-file "@BUILDDIR@/test/acct/scheme")  (define radius-acct-file "@BUILDDIR@/raddb/acct/scheme")
14    
15  (define (acct req)  (define (acct req)
16    (call-with-output-file radius-acct-file    (call-with-output-file radius-acct-file

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26