diff --git a/mystic/nodespy_term.pas b/mystic/nodespy_term.pas
index 62b5404..a5a27ba 100644
--- a/mystic/nodespy_term.pas
+++ b/mystic/nodespy_term.pas
@@ -408,6 +408,7 @@ Var
   Str      : String;
   Path     : String;
   Mask     : String;
+  OrigDIR  : String;
 
   Procedure UpdateInfo;
   Begin
@@ -498,6 +499,8 @@ Begin
   DirList  := TMenuList.Create(TOutput(Screen));
   FileList := TMenuList.Create(TOutput(Screen));
 
+  GetDIR (0, OrigDIR);
+
   FileList.NoWindow   := True;
   FileList.LoChars    := #9#13#27;
   FileList.HiChars    := #77;
@@ -630,6 +633,8 @@ Begin
     End;
   Until Done;
 
+  ChDIR(OrigDIR);
+
   FileList.Free;
   DirList.Free;
   Box.Close;