Remove old debugging method.

1 files changed, 0 insertions, 13 deletions

diff --git a/scripts/MarkdownBook/Book.pm b/scripts/MarkdownBook/Book.pm
index cf706a2..09225df 100644
--- a/scripts/MarkdownBook/Book.pm
+++ b/scripts/MarkdownBook/Book.pm
@@ -251,17 +251,4 @@ sub output
 	}
 }
 
-sub list_documents
-{
-	my ($self) = @_;
-	my $doc;
-
-	foreach $doc (@{$self->{'docs'}}) {
-		printf("Document:\n File: %s\n Title: %s\n Full Title: %s\n",
-			$doc->file(), $doc->title(), $doc->full_title());
-		printf(" Prev: %s\n", $doc->prev()->file()) if defined $doc->prev();
-		printf(" Next: %s\n", $doc->next()->file()) if defined $doc->next();
-	}
-}
-
 1;