From 134141814e21fa8ac3132635bfad541be9e86304 Mon Sep 17 00:00:00 2001
From: Robert Greene <robgreene@users.sourceforge.net>
Date: Tue, 9 Nov 2004 04:07:39 +0000
Subject: [PATCH] Incorporated John B Matthews correction to file listing
 algorithm.

---
 .../applecommander/storage/os/pascal/PascalFormatDisk.java   | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/src/com/webcodepro/applecommander/storage/os/pascal/PascalFormatDisk.java b/src/com/webcodepro/applecommander/storage/os/pascal/PascalFormatDisk.java
index 23ed8d7..a16d112 100644
--- a/src/com/webcodepro/applecommander/storage/os/pascal/PascalFormatDisk.java
+++ b/src/com/webcodepro/applecommander/storage/os/pascal/PascalFormatDisk.java
@@ -139,6 +139,7 @@ public class PascalFormatDisk extends FormattedDisk {
 	/**
 	 * Retrieve a list of files.
 	 * @see com.webcodepro.applecommander.storage.FormattedDisk#getFiles()
+	 * @author John B. Matthews (for fixing algorithm)
 	 */
 	public List getFiles() {
 		List list = new ArrayList();
@@ -146,10 +147,10 @@ public class PascalFormatDisk extends FormattedDisk {
 		// process directory blocks:
 		int entrySize = ENTRY_SIZE;
 		int offset = entrySize;
-		while (offset < directory.length) {
+		int count = AppleUtil.getWordValue(directory, 16);
+		for (int i=0; i<count; i++) {
 			byte[] entry = new byte[entrySize];
 			System.arraycopy(directory, offset, entry, 0, entry.length);
-			if (entry[6] == 0) break;	// at end
 			list.add(new PascalFileEntry(entry, this));
 			offset+= entrySize;
 		}