fixed a bug (last item not displayed)

[lectures/dfb-slides.git] / parse.pl

diff --git a/parse.pl b/parse.pl
index 0dbf9a0..a06ff05 100755 (executable)
--- a/parse.pl
+++ b/parse.pl
@@ -51,7 +51,6 @@ foreach(@content) {
        if(/^ \d/) {
                if(@slide) {
                        print "<slide>\n";
-                       pop(@slide);
                        print STDERR "$topics[$topic]\n";
                        print "<header size=\"20\" fgcolor=\"#22FF22\">$topics[$topic]</header>\n<text></text>\n";
                        foreach(@slide) {