From 565ee2017b69ec101f69dc38457386cad43452bb Mon Sep 17 00:00:00 2001
From: Donald Curtis <dcurtis@milkbox.net>
Date: Tue, 17 Apr 2012 15:27:34 -0500
Subject: [PATCH] add a BOUND parameter to the timestamp parser

---
 package-build.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/package-build.el b/package-build.el
index 27b928f9..7941878c 100644
--- a/package-build.el
+++ b/package-build.el
@@ -71,12 +71,12 @@
 
 ;;; Internal functions
 
-(defun pb/find-parse-time (regex)
+(defun pb/find-parse-time (regex &optional bound)
   "Find REGEX in current buffer and format as a proper time version."
   (format-time-string
    "%Y%m%d"
    (date-to-time
-    (print (progn (re-search-backward regex)
+    (print (progn (re-search-backward regex bound)
                   (match-string-no-properties 1))))))
 
 (defun pb/run-process (dir prog &rest args)