Blob Blame History Raw

Allow format upgrade on version 6 databases where the format as
two, not three semicolons in the comment.  (Like mine :-) 

--- bbdb-3.1.2/lisp/bbdb.el-	2014-12-10 19:05:06.499218080 -0800
+++ bbdb-3.1.2/lisp/bbdb.el	2014-12-10 19:05:20.635201879 -0800
@@ -3296,7 +3296,7 @@
             (bbdb-overwrite-record-internal record))
           ;; update file format
           (goto-char (point-min))
-          (if (re-search-forward (format "^;;; file-\\(version\\|format\\): %d$"
+          (if (re-search-forward (format "^;;;? file-\\(version\\|format\\): %d$"
                                          file-format) nil t)
               (replace-match (format ";;; file-format: %d" bbdb-file-format)))))))