emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/textile-mode c5c3c2c27a 06/19: Fix whitespace


From: ELPA Syncer
Subject: [nongnu] elpa/textile-mode c5c3c2c27a 06/19: Fix whitespace
Date: Sat, 29 Jan 2022 08:29:35 -0500 (EST)

branch: elpa/textile-mode
commit c5c3c2c27a8b6e9684bebf53dae6f4e9b4583d74
Author: Matus Goljer <dota.keys@gmail.com>
Commit: Matus Goljer <dota.keys@gmail.com>

    Fix whitespace
---
 textile-mode.el | 44 ++++++++++++++++++++++----------------------
 1 file changed, 22 insertions(+), 22 deletions(-)

diff --git a/textile-mode.el b/textile-mode.el
index d794c09904..7bcc046248 100644
--- a/textile-mode.el
+++ b/textile-mode.el
@@ -22,7 +22,7 @@
 
 ;;; Commentary:
 
-;; 
+;;
 
 
 ;; Known bugs or limitations:
@@ -35,7 +35,7 @@
 ;;   not well-rendered (for example, *strong *{something}notstrong*)
 ;;
 
-                                       
+
 
 ;;; Code:
 
@@ -51,16 +51,16 @@
 (defun textile-re-concat (l)
   "Concatenate the elements of a list with a \\| separator and
 non-matching parentheses"
-  (concat 
+  (concat
    "\\(?:"
    (mapconcat 'identity l "\\|")
    "\\)"))
 
 
-(setq textile-attributes 
+(setq textile-attributes
       '("{[^}]*}" "([^)]*)" "\\[[^]]*\\]"))
 
-(setq textile-blocks 
+(setq textile-blocks
       '("^h1" "^h2" "^h3" "^h4" "^h5" "^h6" "^p" "^bq" "^fn[0-9]+" "^#+ " 
"^\\*+ " "^table"))
 
 (setq textile-inline-markup
@@ -78,11 +78,11 @@ non-matching parentheses"
 
 (defun textile-block-matcher (bloc)
   "Return the matcher regexp for a block element"
-  (concat 
+  (concat
    "^"
-   bloc 
-   (textile-re-concat textile-alignments) "?" 
-   (textile-re-concat textile-attributes) "*" 
+   bloc
+   (textile-re-concat textile-alignments) "?"
+   (textile-re-concat textile-attributes) "*"
    "\\. "
    "\\(\\(?:.\\|\n\\)*?\\)\n\n"))
 
@@ -91,25 +91,25 @@ non-matching parentheses"
   (concat
    (textile-re-concat (append textile-blocks textile-inline-markup))
    (textile-re-concat textile-alignments) "*"
-   (textile-re-concat textile-attributes) "*" 
-   "\\(" attr-start "[^" 
+   (textile-re-concat textile-attributes) "*"
+   "\\(" attr-start "[^"
    (if (string-equal attr-end "\\]") "]" attr-end)
    "]*" attr-end "\\)"))
 
 (defun textile-inline-markup-matcher (markup)
   "Return the matcher regexp for an inline markup"
   (concat
-   "\\W\\(" 
+   "\\W\\("
    markup
    "\\(?:\\w\\|\\w.*?\\w\\|[[{(].*?\\w\\)"
-   markup 
+   markup
    "\\)\\W"))
 
 (defun textile-list-bullet-matcher (bullet)
   "Return the matcher regexp for a list bullet"
   (concat
    "^\\(" bullet "\\)"
-   (textile-re-concat textile-alignments) "*" 
+   (textile-re-concat textile-alignments) "*"
    (textile-re-concat textile-attributes) "*"))
 
 (defun textile-alignments-matcher ()
@@ -121,8 +121,8 @@ non-matching parentheses"
 (defun textile-table-matcher ()
   "Return the matcher regexp for a table row or header"
   (concat
-   "\\(?:" 
-   "^table" (textile-re-concat textile-table-alignments) "*" 
(textile-re-concat textile-attributes) "*" "\\. *$" 
+   "\\(?:"
+   "^table" (textile-re-concat textile-table-alignments) "*" 
(textile-re-concat textile-attributes) "*" "\\. *$"
    "\\|"
    "^" (textile-re-concat textile-table-alignments) "*" (textile-re-concat 
textile-attributes) "*" "\\(?:\\. *|\\)"
    "\\|"
@@ -160,7 +160,7 @@ non-matching parentheses"
        `(,(textile-block-matcher "h1") 1 'textile-h1-face t t)
        `(,(textile-block-matcher "h2") 1 'textile-h2-face t t)
        `(,(textile-block-matcher "h3") 1 'textile-h3-face t t)
-       `(,(textile-block-matcher "h4") 1 'textile-h4-face t t) 
+       `(,(textile-block-matcher "h4") 1 'textile-h4-face t t)
        `(,(textile-block-matcher "h5") 1 'textile-h5-face t t)
        `(,(textile-block-matcher "h6") 1 'textile-h6-face t t)
        ;; blockquotes
@@ -175,11 +175,11 @@ non-matching parentheses"
        ;; emphasis
        `(,(textile-inline-markup-matcher "__") 1 'textile-emph-face prepend t)
        `(,(textile-inline-markup-matcher "_") 1 'textile-emph-face prepend t)
-       '("<em>\\(.\\|\n\\)*?</em>" 0 'textile-emph-face prepend t) 
+       '("<em>\\(.\\|\n\\)*?</em>" 0 'textile-emph-face prepend t)
        ;; strength
        `(,(textile-inline-markup-matcher "\\*\\*") 1 'textile-strong-face 
prepend t)
        `(,(textile-inline-markup-matcher "\\*") 1 'textile-strong-face prepend 
t)
-       '("<strong>\\(.\\|\n\\)*?</strong>" 0 'textile-strong-face prepend t) 
+       '("<strong>\\(.\\|\n\\)*?</strong>" 0 'textile-strong-face prepend t)
        ;; citation
        `(,(textile-inline-markup-matcher "\\?\\?") 1 'textile-citation-face 
prepend t)
        ;; code
@@ -199,9 +199,9 @@ non-matching parentheses"
        `(,(textile-image-matcher) 0 'textile-image-face t t)
 
        ;; ordered list bullet
-       `(,(textile-list-bullet-matcher "#+") 1 'textile-ol-bullet-face)       
+       `(,(textile-list-bullet-matcher "#+") 1 'textile-ol-bullet-face)
        ;; unordered list bullet
-       `(,(textile-list-bullet-matcher "\\*+") 1 'textile-ul-bullet-face) 
+       `(,(textile-list-bullet-matcher "\\*+") 1 'textile-ul-bullet-face)
 
        ;; style
        `(,(textile-attribute-matcher "{" "}") 1 'textile-style-face t t)
@@ -399,4 +399,4 @@ non-matching parentheses"
 
 
 (provide 'textile-mode)
- ;;; textile-mode.el ends here
\ No newline at end of file
+ ;;; textile-mode.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]