remove the extract notes script (deprecated)

diff --git a/template/Makefile b/template/Makefile
index 82020c383a982b0abf2f612f2dc3ef785f7816e7..ac308642814d94333a28d9732e29b086e5ea52fd 100644 (file)
--- a/template/Makefile
+++ b/template/Makefile
@@ -5,7 +5,6 @@ pdf: all
 
 %.pdf: %.tex 
        rubber -fd $<
 
 %.pdf: %.tex 
        rubber -fd $<

-       extract-notes $<

 
 # by default, we produce combined notes/slides output
 notes.config:
 
 # by default, we produce combined notes/slides output
 notes.config:

diff --git a/template/extract-notes b/template/extract-notes
deleted file mode 100755 (executable)
index 0d11083..0000000
--- a/template/extract-notes
+++ /dev/null
@@ -1,48 +0,0 @@
-#!/usr/bin/perl -w
-
-foreach $filename (@ARGV) {
-    chomp $filename;
-    open(TEXFILE, "<$filename");
-
-    $notes_filename = $filename;
-    $notes_filename =~ s/\.tex$/.pdfpc/;
-
-    $pdf_filename = $filename;
-    $pdf_filename =~ s/\.tex$/.pdf/;
-
-    open(NOTESFILE, "\>$notes_filename");
-    print NOTESFILE "[file]\n$pdf_filename\n[notes]\n";
-
-    $note_record = 0;
-    $slide_counter = 1;
-    while ($line = <TEXFILE>) {
-        # if this is a new frame
-        if ($line =~ /^\\begin\{frame\}/) {
-            $slide_counter++;
-        }
-        
-        if ($line =~ /^\% pdfpc\:end/) {
-            $note_record = 0;
-            $note_text =~ s/^\s*(.*?)\s*$/$1/;
-            print NOTESFILE "\#\#\# $slide_counter\n$note_text\n";
-        }
-        
-        # record if we're between a begin and an end
-        if ($note_record) {
-            $line_tmp = $line;
-            $line_tmp =~ s/^\%\s*//; 
-            $note_text = $note_text . $line_tmp;
-        }
-
-        # if this a new note
-        if ($line =~ /^\% pdfpc\:begin/) {
-            $note_text = "";
-            $note_record = 1;
-        }
-    }
-
-    close(TEXFILE);
-    close(NOTESFILE);
-
-}
-