From 0ebac7637d51264d3789f186393087bbf32cc5fc Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 4 Aug 1994 06:21:42 +0000
Subject: [PATCH] Add declaration to eliminate compiler warning.
---
v7/src/edwin/dired.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/v7/src/edwin/dired.scm b/v7/src/edwin/dired.scm
index 50013c3a5..0ca49acf2 100644
--- a/v7/src/edwin/dired.scm
+++ b/v7/src/edwin/dired.scm
@@ -1,6 +1,6 @@
;;; -*-Scheme-*-
;;;
-;;; $Id: dired.scm,v 1.149 1994/08/04 04:36:47 cph Exp $
+;;; $Id: dired.scm,v 1.150 1994/08/04 06:21:42 cph Exp $
;;;
;;; Copyright (c) 1986, 1989-94 Massachusetts Institute of Technology
;;;
@@ -541,6 +541,7 @@ When renaming multiple or marked files, you specify a directory."
(define (dired-create-file-operation operation)
(lambda (lstart from to)
+ lstart
(call-with-current-continuation
(lambda (continuation)
(bind-condition-handler (list condition-type:file-error
--
2.25.1