From f382a496acb1f5ab61843e2a0ec8b6d84a9dbfcf Mon Sep 17 00:00:00 2001 From: "Artyom V. Poptsov" Date: Thu, 29 Oct 2015 15:09:55 +0300 Subject: tests/session.scm: Use (tests common) --- tests/session.scm | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) (limited to 'tests/session.scm') diff --git a/tests/session.scm b/tests/session.scm index 3b5ffa2..ceba11f 100644 --- a/tests/session.scm +++ b/tests/session.scm @@ -1,6 +1,6 @@ ;;; session.scm -- Testing of session procedures without a connection. -;; Copyright (C) 2014 Artyom V. Poptsov +;; Copyright (C) 2014, 2015 Artyom V. Poptsov ;; ;; This file is a part of Guile-SSH. ;; @@ -17,14 +17,15 @@ ;; You should have received a copy of the GNU General Public License ;; along with Guile-SSH. If not, see . +(add-to-load-path (getenv "abs_top_srcdir")) + (use-modules (srfi srfi-64) - (ssh session)) + (ssh session) + ;; Helper procedures + (tests common)) (test-begin "session") -(define %topdir (getenv "abs_top_srcdir")) -(define %rsakey (format #f "~a/tests/rsakey" %topdir)) - (test-assert "%make-session" (%make-session)) -- cgit v1.2.3