[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 234f6ea 5/5: Merge commit '50b9ec928193f339c3c2ae20f088ea6
|
From: |
Clément Pit--Claudel |
|
Subject: |
[elpa] master 234f6ea 5/5: Merge commit '50b9ec928193f339c3c2ae20f088ea62cc82bb9d' |
|
Date: |
Wed, 11 Nov 2020 00:15:35 -0500 (EST) |
branch: master
commit 234f6ead6ca6cd5817ccc83059f78eba80c7ca0d
Merge: 8675c0f 50b9ec9
Author: Clément Pit-Claudel <clement.pitclaudel@live.com>
Commit: Clément Pit-Claudel <clement.pitclaudel@live.com>
Merge commit '50b9ec928193f339c3c2ae20f088ea62cc82bb9d'
---
packages/compact-docstrings/compact-docstrings.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/packages/compact-docstrings/compact-docstrings.el
b/packages/compact-docstrings/compact-docstrings.el
index 584c9ca..db224a2 100644
--- a/packages/compact-docstrings/compact-docstrings.el
+++ b/packages/compact-docstrings/compact-docstrings.el
@@ -1,11 +1,11 @@
;;; compact-docstrings.el --- Shrink blank lines in docstrings and doc comments
-;; Copyright (C) 2016 Free Software Foundation, Inc.
+;; Copyright (C) 2016-2020 Free Software Foundation, Inc.
;; Author: Clément Pit-Claudel <clement.pitclaudel@live.com>
;; Maintainer: Clément Pit-Claudel <clement.pitclaudel@live.com>
;; URL: https://github.com/cpitclaudel/compact-docstrings
-;; Package-Version: 0.1
+;; Package-Version: 0.2
;; Keywords: convenience, faces, lisp, maint, c
;; This program is free software; you can redistribute it and/or modify
@@ -50,7 +50,7 @@
(defun compact-docstrings--matcher (bound)
"Find blank line in docstring, looking in point .. BOUND."
(let ((found nil))
- (while (and (not found) (re-search-forward "^\\s-*\n" bound t))
+ (while (and (not found) (re-search-forward "^\n" bound t))
(let ((syntax (syntax-ppss)))
(when (and (or (nth 3 syntax) ;; In string
(nth 4 syntax)) ;; In comment
@@ -67,7 +67,7 @@
;;;###autoload
(define-minor-mode compact-docstrings-mode
"Shrink empty lines in docstrings and doc comments."
- :lighter " compact"
+ :lighter " →∥â†"
(if compact-docstrings-mode
(font-lock-add-keywords nil compact-docstrings--keywords 'append)
(font-lock-remove-keywords nil compact-docstrings--keywords))