From b00004f73e9b4d61186c2b058d3a15f1765c2a27 Mon Sep 17 00:00:00 2001
From: Austen Adler <stonewareslord@gmail.com>
Date: Fri, 19 Aug 2016 11:15:21 -0400
Subject: [PATCH] Get rid of non working extra code, put it in
 dev/process-comment

---
 process.pl | 31 -------------------------------
 1 file changed, 31 deletions(-)

diff --git a/process.pl b/process.pl
index 545c4d8..69de7c8 100755
--- a/process.pl
+++ b/process.pl
@@ -56,34 +56,3 @@ sub process_file {
   }
   return $data;
 }
-#sub process_comment {
-#  # The data string
-#  my $data = $_[0];
-#  # Is the author line in there?
-#  my $author = 0;
-#  # Is the description there?
-#  my $desc = 0;
-#  # Is the first name there?
-#  my $fname = 0;
-#  # Are we still in the top comment area?
-#  my $incomment = 1;
-#  # If there is no top comment in the beginning, add the base comment
-#  if ($data !~ /^\s*\/\*\*/) {
-#    $data = "/**\n * \@file $filename\n * \@author Austen Adler (agadler)\n * TODO: Description\n */\n$data";
-#    $author = 1;
-#    $desc = 1;
-#    $fname = 1;
-#  } else {
-#    # Otherwise process an existing comment
-#    while ($incomment) {
-#      if (/\s*\*\//) {
-#        $incomment = 0;
-#      } elsif (/\s*\* \@author/) {
-#      } elsif (/\s*\* \@file $filename/) {
-#      } elsif (/\s*\* \@author/) {
-#      }
-#    }
-#    
-#  }
-#  return $data;
-#}