[elpa] master b674274 3/4: Allow outline-minor-mode to find section headings

[Julien Danjou]

branch: master
commit b674274beddb4290c34ce5c7ae3988ae31e97081
Author: Jonas Bernoulli <address@hidden>
Commit: Julien Danjou <address@hidden>

    Allow outline-minor-mode to find section headings
---
 packages/rainbow-mode/rainbow-mode.el | 26 +++++++++++++++++---------
 1 file changed, 17 insertions(+), 9 deletions(-)

diff --git a/packages/rainbow-mode/rainbow-mode.el 
b/packages/rainbow-mode/rainbow-mode.el
index e1796e4..e8d4b02 100644
--- a/packages/rainbow-mode/rainbow-mode.el
+++ b/packages/rainbow-mode/rainbow-mode.el
@@ -44,7 +44,8 @@
   :tag "Rainbow"
   :group 'help)
 
-;; Hexadecimal colors
+;;; Hexadecimal colors
+
 (defvar rainbow-hexadecimal-colors-font-lock-keywords
   '(("[^&]\\(#\\(?:[0-9a-fA-F]\\{3\\}\\)+\\{1,4\\}\\)"
      (1 (rainbow-colorize-itself 1)))
@@ -58,7 +59,8 @@
      (0 (rainbow-colorize-itself))))
   "Font-lock keywords to add for hexadecimal colors.")
 
-;; rgb() colors
+;;; rgb() colors
+
 (defvar rainbow-html-rgb-colors-font-lock-keywords
   
'(("rgb(\s*\\([0-9]\\{1,3\\}\\(?:\.[0-9]\\)?\\(?:\s*%\\)?\\)\s*,\s*\\([0-9]\\{1,3\\}\\(?:\\.[0-9]\\)?\\(?:\s*%\\)?\\)\s*,\s*\\([0-9]\\{1,3\\}\\(?:\\.[0-9]\\)?\\(?:\s*%\\)?\\)\s*)"
      (0 (rainbow-colorize-rgb)))
@@ -70,7 +72,8 @@
      (0 (rainbow-colorize-hsl))))
   "Font-lock keywords to add for RGB colors.")
 
-;; HTML colors name
+;;; HTML colors
+
 (defvar rainbow-html-colors-font-lock-keywords nil
   "Font-lock keywords to add for HTML colors.")
 (make-variable-buffer-local 'rainbow-html-colors-font-lock-keywords)
@@ -246,7 +249,8 @@ will be enabled if a major mode has been detected from the
                  (symbol :tag "disable" nil))
   :group 'rainbow)
 
-;; X colors
+;;; X colors
+
 (defvar rainbow-x-colors-font-lock-keywords
   `((,(regexp-opt (x-defined-colors) 'words)
      (0 (rainbow-colorize-itself))))
@@ -270,7 +274,8 @@ will be enabled if a major mode has been detected from the
                  (symbol :tag "disable" nil))
   :group 'rainbow)
 
-;; LaTeX colors
+;;; LaTeX colors
+
 (defvar rainbow-latex-rgb-colors-font-lock-keywords
   '(("{rgb}{\\([0-9.]+\\),\s*\\([0-9.]+\\),\s*\\([0-9.]+\\)}"
      (0 (rainbow-colorize-rgb-float)))
@@ -298,7 +303,8 @@ will be enabled if a major mode has been detected from the
                  (symbol :tag "disable" nil))
   :group 'rainbow)
 
-;; Shell colors
+;;; Shell colors
+
 (defvar rainbow-ansi-colors-font-lock-keywords
   '(("\\(\\\\[eE]\\|\\\\033\\|\\\\x1[bB]\\|\033\\)\\[\\([0-9;]*m\\)"
      (0 (rainbow-colorize-ansi))))
@@ -322,9 +328,8 @@ will be enabled if a major mode has been detected from the
                  (symbol :tag "disable" nil))
   :group 'rainbow)
 
-;; R colors
+;;; R colors
 
-;; R colors name
 (defvar rainbow-r-colors-font-lock-keywords nil
   "Font-lock keywords to add for R colors.")
 (make-variable-buffer-local 'rainbow-r-colors-font-lock-keywords)
@@ -1013,7 +1018,8 @@ will be enabled if a major mode has been detected from the
                  (symbol :tag "disable" nil))
   :group 'rainbow)
 
-;; Functions
+;;; Functions
+
 (defun rainbow-colorize-match (color &optional match)
   "Return a matched string propertized with a face whose
 background is COLOR. The foreground is computed using
@@ -1123,6 +1129,8 @@ Return a value between 0 and 1."
          (b (/ (caddr values) 256.0)))
     (rainbow-color-luminance r g b)))
 
+;;; Mode
+
 (defun rainbow-turn-on ()
   "Turn on raibow-mode."
   (font-lock-add-keywords nil