Add packages/darkroom by merging its upstream subtree

[gnu-emacs-elpa] / packages / flylisp / flylisp.el

diff --git a/packages/flylisp/flylisp.el b/packages/flylisp/flylisp.el
index b8c296ca21762dcb831e2cc9afccced9b980156c..647a54334b672b749dfe6b74c2ccf7fb007e935a 100644 (file)
--- a/packages/flylisp/flylisp.el
+++ b/packages/flylisp/flylisp.el
@@ -1,6 +1,6 @@
 ;;; flylisp.el --- Color unbalanced parentheses and parentheses inconsistent with indentation -*- lexical-binding: t; -*-
 
-;; Copyright (C) 2013  Free Software Foundation, Inc.
+;; Copyright (C) 2013-2014  Free Software Foundation, Inc.
 
 ;; Author: Barry O'Reilly <gundaetiapo@gmail.com>
 ;; Version: 0.2
@@ -22,7 +22,8 @@
 ;;; Commentary:
 
 ;; Colors mismatched open parentheses with fl-mismatched-face, red by
-;; default.
+;; default. Works reliably after Emacs 24.3, in which bug 16247 is
+;; fixed.
 ;;
 ;; Also colors open and close parentheses which are inconsistent with
 ;; the indentation of lines between them with fl-inconsistent-face,
@@ -55,10 +56,6 @@
 
 ;;; Code:
 
-;; TODO: There are display problems with mismatched parens, due to the
-;; region not expanding enough, in turn due to an apparent syntax-ppss
-;; bug. See Emacs bug 16247.
-
 ;; TODO: Algorithm doesn't account for close paren which is too soon.
 ;;
 ;; (abc
@@ -475,6 +472,8 @@ next in the list. This is used to scan-lists efficiently."
                                 rear-nonsticky nil))
       (forward-char 1))))
 
+(defvar jit-lock-start)
+
 (defsubst flylisp-extend-region-after-change (start _end _old-len)
   ;; It seems redisplay works its way from before start to after end,
   ;; so it's more important to expand the start in order to get