[elpa] master 3787f8e 1/3: Fix #2 - Use equal instead of eq to validate :const

2016-10-12 Thread Artur Malabarba 
branch: master
commit 3787f8eac611703f8d20ca6a38e0bceb76aa6259
Author: Artur Malabarba 
Commit: Artur Malabarba 

Fix #2 - Use equal instead of eq to validate :const
---
 validate.el |2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/validate.el b/validate.el
index 7ca4b0a..0082d8d 100644
--- a/validate.el
+++ b/validate.el
@@ -96,7 +96,7 @@ If they don't match, return an explanation."
 ((wtype 'list))
 (t (let ((subschema (car args)))
  (seq-some (lambda (v) (validate--check v 
subschema)) value)
-   ((const function-item variable-item) (unless (eq value (car 
args))
+   ((const function-item variable-item) (unless (equal value (car 
args))
   "not the expected 
value"))
(file (cond ((wtype 'string))
((file-exists-p value) nil)

[elpa] master updated (98e1de1 -> 16506d7)

2016-10-12 Thread Artur Malabarba 
malabarba pushed a change to branch master.

  from  98e1de1   Merge commit 'ab1a5c589378334eafca105af1a17f73b9065423'
   new  6564e18   Whitespace
   new  34de254   [#7] Support using skeletons as expansions
   new  325c21e   Compiler warning
   new  fffe8d0   Version 1.6.2
   new  16506d7   Merge commit 'fffe8d0b42b143a2e7df0470d9049fa57b6ecac5'


Summary of changes:
 packages/sotlisp/sotlisp.el |   21 ++---
 1 file changed, 14 insertions(+), 7 deletions(-)

[elpa] master 34de254 2/5: [#7] Support using skeletons as expansions

2016-10-12 Thread Artur Malabarba 
branch: master
commit 34de2548218d39b49da55d66d141c89e8ee1d85b
Author: Artur Malabarba 
Commit: Artur Malabarba 

[#7] Support using skeletons as expansions
---
 sotlisp.el |   19 +--
 1 file changed, 13 insertions(+), 6 deletions(-)

diff --git a/sotlisp.el b/sotlisp.el
index c52fe95..8d036aa 100644
--- a/sotlisp.el
+++ b/sotlisp.el
@@ -81,6 +81,7 @@
 ;;   (with-temp-buffer (insert text))
 
 ;;; Code:
+(require 'skeleton)
 
 ;;; Predicates
 (defun sotlisp--auto-paired-p ()
@@ -203,8 +204,14 @@ See `sotlisp-define-function-abbrev'."
 (skip-chars-backward (rx alnum))
 (let* ((name (buffer-substring (point) r))
(expansion (gethash name sotlisp--function-table)))
-  (if (not expansion)
-  (progn (goto-char r) nil)
+  (cond
+   ((not expansion) (progn (goto-char r) nil))
+   ((consp expansion)
+(delete-region (point) r)
+(let ((skeleton-end-newline nil))
+  (skeleton-insert (cons "" expansion)))
+t)
+   ((stringp expansion)
 (delete-region (point) r)
 (if (sotlisp--function-quote-p)
 ;; After #' use the simple expansion.
@@ -214,7 +221,7 @@ See `sotlisp-define-function-abbrev'."
   (when (string-match "\\$" expansion)
 (setq sotlisp--needs-moving t)))
 ;; Must be last.
-(sotlisp--post-expansion-cleanup)
+(sotlisp--post-expansion-cleanup))
 
 (put 'sotlisp--expand-function 'no-self-insert t)
 
@@ -295,12 +302,12 @@ The space char is not included.  Any \"$\" are also 
removed."
 ("jos" . "just-one-space")
 ("jr" . "json-read$")
 ("jtr" . "jump-to-register ")
-("k" . "kbd \"$\"")
+("k" . ("kbd " (format "%S" (key-description (read-key-sequence-vector 
"Key: ")
 ("kb" . "kill-buffer")
 ("kn" . "kill-new ")
 ("kp" . "keywordp ")
 ("l" . "lambda ($)")
-("la" . "looking-at \"$\"")
+("la" . ("looking-at \"" - "\""))
 ("lap" . "looking-at-p \"$\"")
 ("lb" . "looking-back \"$\"")
 ("lbp" . "line-beginning-position")
@@ -658,7 +665,7 @@ With a prefix argument, defines a `defvar' instead of a 
`defcustom'."
   (skip-chars-backward "\r\n[:blank:]")
   (setq p (point-marker))
   (backward-up-list)))
-  ;; Re-comment everything before it. 
+  ;; Re-comment everything before it.
   (ignore-errors
 (comment-region beg p))
   ;; And everything after it.

[elpa] master 16506d7 5/5: Merge commit 'fffe8d0b42b143a2e7df0470d9049fa57b6ecac5'

2016-10-12 Thread Artur Malabarba 
branch: master
commit 16506d762e15dffa8e33ced92d85396a9ba86b0a
Merge: 98e1de1 fffe8d0
Author: Artur Malabarba 
Commit: Artur Malabarba 

Merge commit 'fffe8d0b42b143a2e7df0470d9049fa57b6ecac5'
---
 packages/sotlisp/sotlisp.el |   21 ++---
 1 file changed, 14 insertions(+), 7 deletions(-)

diff --git a/packages/sotlisp/sotlisp.el b/packages/sotlisp/sotlisp.el
index 2ceb382..792fe1d 100644
--- a/packages/sotlisp/sotlisp.el
+++ b/packages/sotlisp/sotlisp.el
@@ -6,7 +6,7 @@
 ;; URL: https://github.com/Malabarba/speed-of-thought-lisp
 ;; Keywords: convenience, lisp
 ;; Package-Requires: ((emacs "24.1"))
-;; Version: 1.5.2
+;; Version: 1.6.2
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by
@@ -81,6 +81,7 @@
 ;;   (with-temp-buffer (insert text))
 
 ;;; Code:
+(require 'skeleton)
 
 ;;; Predicates
 (defun sotlisp--auto-paired-p ()
@@ -101,7 +102,7 @@ Specially, avoids matching inside argument lists."
(not (sotlisp--looking-back 
"(\\(defun\\s-+.*\\|\\(lambda\\|dolist\\|dotimes\\)\\s-+\\)("))
(save-excursion
  (forward-char -1)
- (condition-case er
+ (condition-case nil
  (progn
(backward-up-list)
(forward-sexp -1)
@@ -203,8 +204,14 @@ See `sotlisp-define-function-abbrev'."
 (skip-chars-backward (rx alnum))
 (let* ((name (buffer-substring (point) r))
(expansion (gethash name sotlisp--function-table)))
-  (if (not expansion)
-  (progn (goto-char r) nil)
+  (cond
+   ((not expansion) (progn (goto-char r) nil))
+   ((consp expansion)
+(delete-region (point) r)
+(let ((skeleton-end-newline nil))
+  (skeleton-insert (cons "" expansion)))
+t)
+   ((stringp expansion)
 (delete-region (point) r)
 (if (sotlisp--function-quote-p)
 ;; After #' use the simple expansion.
@@ -214,7 +221,7 @@ See `sotlisp-define-function-abbrev'."
   (when (string-match "\\$" expansion)
 (setq sotlisp--needs-moving t)))
 ;; Must be last.
-(sotlisp--post-expansion-cleanup)
+(sotlisp--post-expansion-cleanup))
 
 (put 'sotlisp--expand-function 'no-self-insert t)
 
@@ -295,12 +302,12 @@ The space char is not included.  Any \"$\" are also 
removed."
 ("jos" . "just-one-space")
 ("jr" . "json-read$")
 ("jtr" . "jump-to-register ")
-("k" . "kbd \"$\"")
+("k" . ("kbd " (format "%S" (key-description (read-key-sequence-vector 
"Key: ")
 ("kb" . "kill-buffer")
 ("kn" . "kill-new ")
 ("kp" . "keywordp ")
 ("l" . "lambda ($)")
-("la" . "looking-at \"$\"")
+("la" . ("looking-at \"" - "\""))
 ("lap" . "looking-at-p \"$\"")
 ("lb" . "looking-back \"$\"")
 ("lbp" . "line-beginning-position")

[elpa] master 6564e18 1/5: Whitespace

2016-10-12 Thread Artur Malabarba 
branch: master
commit 6564e18ba121bd1ce1527fbc49b5d4247f384e83
Author: Artur Malabarba 
Commit: Artur Malabarba 

Whitespace
---
 sotlisp.el |   18 +-
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/sotlisp.el b/sotlisp.el
index 95b626e..c52fe95 100644
--- a/sotlisp.el
+++ b/sotlisp.el
@@ -33,12 +33,12 @@
 ;;
 ;; A large number of abbrevs which expand function
 ;; initials to their name.  A few examples:
-;; 
+;;
 ;; - wcb -> with-current-buffer
 ;; - i -> insert
 ;; - r -> require '
 ;; - a -> and
-;; 
+;;
 ;; However, these are defined in a way such that they ONLY expand in a
 ;; place where you would use a function, so hitting SPC after "(r"
 ;; expands to "(require '", but hitting SPC after "(delete-region r"
@@ -52,32 +52,32 @@
 ;; thought-flow" way of writing.  The bindings are as follows, I
 ;; understand these don't fully adhere to conventions, and I'd
 ;; appreciate suggestions on better bindings.
-;; 
+;;
 ;; - M-RET :: Break line, and insert "()" with point in the middle.
 ;; - C-RET :: Do `forward-up-list', then do M-RET.
-;; 
+;;
 ;; Hitting RET followed by a `(' was one of the most common key sequences
 ;; for me while writing elisp, so giving it a quick-to-hit key was a
 ;; significant improvement.
-;; 
+;;
 ;; - C-c f :: Find function under point.  If it is not defined, create a
 ;; definition for it below the current function and leave point inside.
 ;; - C-c v :: Same, but for variable.
-;; 
+;;
 ;; With these commands, you just write your code as you think of it.  Once
 ;; you hit a "stop-point" of sorts in your tought flow, you hit `C-c f/v`
 ;; on any undefined functions/variables, write their definitions, and hit
 ;; `C-u C-SPC` to go back to the main function.
-;; 
+;;
 ;;; Small Example
 ;;
 ;; With the above (assuming you use something like paredit or
 ;; electric-pair-mode), if you write:
 ;;
 ;;   ( w t b M-RET i SPC text
-;; 
+;;
 ;; You get
-;; 
+;;
 ;;   (with-temp-buffer (insert text))
 
 ;;; Code:

[elpa] master fffe8d0 4/5: Version 1.6.2

2016-10-12 Thread Artur Malabarba 
branch: master
commit fffe8d0b42b143a2e7df0470d9049fa57b6ecac5
Author: Artur Malabarba 
Commit: Artur Malabarba 

Version 1.6.2
---
 sotlisp.el |2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sotlisp.el b/sotlisp.el
index 8f16cec..6f279a3 100644
--- a/sotlisp.el
+++ b/sotlisp.el
@@ -6,7 +6,7 @@
 ;; URL: https://github.com/Malabarba/speed-of-thought-lisp
 ;; Keywords: convenience, lisp
 ;; Package-Requires: ((emacs "24.1"))
-;; Version: 1.5.2
+;; Version: 1.6.2
 
 ;; This program is free software; you can redistribute it and/or modify
 ;; it under the terms of the GNU General Public License as published by

[elpa] master 325c21e 3/5: Compiler warning

2016-10-12 Thread Artur Malabarba 
branch: master
commit 325c21e0718aebf0d6929f67da2476dd53ab95bb
Author: Artur Malabarba 
Commit: Artur Malabarba 

Compiler warning
---
 sotlisp.el |2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sotlisp.el b/sotlisp.el
index 8d036aa..8f16cec 100644
--- a/sotlisp.el
+++ b/sotlisp.el
@@ -102,7 +102,7 @@ Specially, avoids matching inside argument lists."
(not (sotlisp--looking-back 
"(\\(defun\\s-+.*\\|\\(lambda\\|dolist\\|dotimes\\)\\s-+\\)("))
(save-excursion
  (forward-char -1)
- (condition-case er
+ (condition-case nil
  (progn
(backward-up-list)
(forward-sexp -1)

[elpa] master e5e2f0a 1/3: Expand docstring. (#16)

2016-10-12 Thread Artur Malabarba 
branch: master
commit e5e2f0a23c56cba750f93e74442104222f7f30c5
Author: Wilfred Hughes 
Commit: Artur Malabarba 

Expand docstring. (#16)

Previously, it wasn't clear how `nameless-insert-name-or-self-insert`
was different from `nameless-insert-name`, so describe when we self
insert.
---
 nameless.el |4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/nameless.el b/nameless.el
index 735b4d8..0169774 100644
--- a/nameless.el
+++ b/nameless.el
@@ -229,7 +229,9 @@ configured, or if `nameless-current-name' is nil."
 (user-error "No name for current buffer, see 
`nameless-current-name'")
 
 (defun nameless-insert-name-or-self-insert ( self-insert)
-  "Insert the name of current package, with a hyphen."
+  "Insert the name of current package, with a hyphen.
+If point is in an argument list, or if we're typing an escaped
+character, insert the current character literally instead."
   (interactive "P")
   (let ((l (point)))
 (call-interactively #'self-insert-command)

[elpa] master ab1a5c5 2/3: Version 1.0.2

2016-10-12 Thread Artur Malabarba 
branch: master
commit ab1a5c589378334eafca105af1a17f73b9065423
Author: Artur Malabarba 
Commit: Artur Malabarba 

Version 1.0.2
---
 nameless.el |2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/nameless.el b/nameless.el
index 0169774..9f34f32 100644
--- a/nameless.el
+++ b/nameless.el
@@ -5,7 +5,7 @@
 ;; Author: Artur Malabarba 
 ;; URL: https://github.com/Malabarba/nameless
 ;; Keywords: convenience, lisp
-;; Version: 1.0.1
+;; Version: 1.0.2
 ;; Package-Requires: ((emacs "24.4"))
 
 ;; This program is free software; you can redistribute it and/or modify

[elpa] master 98e1de1 3/3: Merge commit 'ab1a5c589378334eafca105af1a17f73b9065423'

2016-10-12 Thread Artur Malabarba 
branch: master
commit 98e1de191a09ec16f13e59f6a1f0d6b1a51b9aa0
Merge: d0a3350 ab1a5c5
Author: Artur Malabarba 
Commit: Artur Malabarba 

Merge commit 'ab1a5c589378334eafca105af1a17f73b9065423'
---
 packages/nameless/nameless.el |6 --
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/packages/nameless/nameless.el b/packages/nameless/nameless.el
index 3f21756..eede973 100644
--- a/packages/nameless/nameless.el
+++ b/packages/nameless/nameless.el
@@ -5,7 +5,7 @@
 ;; Author: Artur Malabarba 
 ;; URL: https://github.com/Malabarba/nameless
 ;; Keywords: convenience, lisp
-;; Version: 1.0.1
+;; Version: 1.0.2
 ;; Package-Requires: ((emacs "24.4"))
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -229,7 +229,9 @@ configured, or if `nameless-current-name' is nil."
 (user-error "No name for current buffer, see 
`nameless-current-name'")
 
 (defun nameless-insert-name-or-self-insert ( self-insert)
-  "Insert the name of current package, with a hyphen."
+  "Insert the name of current package, with a hyphen.
+If point is in an argument list, or if we're typing an escaped
+character, insert the current character literally instead."
   (interactive "P")
   (let ((l (point)))
 (call-interactively #'self-insert-command)

[elpa] master updated (d0a3350 -> 98e1de1)

2016-10-12 Thread Artur Malabarba 
malabarba pushed a change to branch master.

  from  d0a3350   Merge commit '3e73c363ca06b85eaa905ba0d0b17e08991e3d3e'
   new  e5e2f0a   Expand docstring. (#16)
   new  ab1a5c5   Version 1.0.2
   new  98e1de1   Merge commit 'ab1a5c589378334eafca105af1a17f73b9065423'


Summary of changes:
 packages/nameless/nameless.el |6 --
 1 file changed, 4 insertions(+), 2 deletions(-)

[elpa] master b42d0bb 3/6: Add a few more excluded modes

2016-10-12 Thread Artur Malabarba 
branch: master
commit b42d0bbb706da6c8f9c1f7f14dab92d41eeca949
Author: Artur Malabarba 
Commit: Artur Malabarba 

Add a few more excluded modes
---
 aggressive-indent.el |3 +++
 1 file changed, 3 insertions(+)

diff --git a/aggressive-indent.el b/aggressive-indent.el
index 9e78ceb..bc65b92 100644
--- a/aggressive-indent.el
+++ b/aggressive-indent.el
@@ -124,6 +124,9 @@ Please include this in your report!"
 doc-view-mode
 dos-mode
 erc-mode
+feature-mode
+fortran-mode
+f90-mode
 jabber-chat-mode
 haml-mode
 haskell-mode

[elpa] master 6113459 4/6: Define aggressive-indent-sit-for-time

2016-10-12 Thread Artur Malabarba 
branch: master
commit 61134590c5645fb5637acd6fa40d89689f9b0f34
Author: Artur Malabarba 
Commit: Artur Malabarba 

Define aggressive-indent-sit-for-time
---
 aggressive-indent.el |7 +++
 1 file changed, 7 insertions(+)

diff --git a/aggressive-indent.el b/aggressive-indent.el
index bc65b92..717df2e 100644
--- a/aggressive-indent.el
+++ b/aggressive-indent.el
@@ -371,6 +371,12 @@ or messages."
   (setq aggressive-indent--changed-list
 (cdr aggressive-indent--changed-list)
 
+(defcustom aggressive-indent-sit-for-time 0.05
+  "Time, in seconds, to wait before indenting.
+If you feel aggressive-indent is causing Emacs to hang while
+typing, try tweaking this number."
+  :type 'float)
+
 (defun aggressive-indent--indent-if-changed ()
   "Indent any region that changed in the last command loop."
   (when aggressive-indent--changed-list
@@ -379,6 +385,7 @@ or messages."
 (unless (or (run-hook-wrapped 
'aggressive-indent--internal-dont-indent-if #'eval)
 (aggressive-indent--run-user-hooks))
   (while-no-input
+(sit-for aggressive-indent-sit-for-time t)
 (redisplay)
 (aggressive-indent--proccess-changed-list-and-indent)))

[elpa] master updated (2405d7a -> d0a3350)

2016-10-12 Thread Artur Malabarba 
malabarba pushed a change to branch master.

  from  2405d7a   Merge commit 'c9d86457d43decf61810006752544d7f7bd5a61d'
   new  e49252f   Change aggressive-indent-dont-electric-modes to be nil by 
default
   new  6c3842e   Add scala-mode to excluded-modes (#88)
   new  b42d0bb   Add a few more excluded modes
   new  6113459   Define aggressive-indent-sit-for-time
   new  3e73c36   Version 1.8.2
   new  d0a3350   Merge commit '3e73c363ca06b85eaa905ba0d0b17e08991e3d3e'


Summary of changes:
 packages/aggressive-indent/aggressive-indent.el |   15 +--
 1 file changed, 13 insertions(+), 2 deletions(-)

[elpa] master e49252f 1/6: Change aggressive-indent-dont-electric-modes to be nil by default

2016-10-12 Thread Artur Malabarba 
branch: master
commit e49252fcb56982fd9b1d215d5477c80fc2a98ec9
Author: Artur Malabarba 
Commit: Artur Malabarba 

Change aggressive-indent-dont-electric-modes to be nil by default
---
 aggressive-indent.el |2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/aggressive-indent.el b/aggressive-indent.el
index e6dba72..4619543 100644
--- a/aggressive-indent.el
+++ b/aggressive-indent.el
@@ -105,7 +105,7 @@ Please include this in your report!"
 (defvar aggressive-indent-mode)
 
 ;;; Configuring indentarion
-(defcustom aggressive-indent-dont-electric-modes '(ruby-mode)
+(defcustom aggressive-indent-dont-electric-modes nil
   "List of major-modes where `electric-indent' should be disabled."
   :type '(choice
   (const :tag "Never use `electric-indent-mode'." t)

[elpa] master 2405d7a 5/5: Merge commit 'c9d86457d43decf61810006752544d7f7bd5a61d'

2016-10-12 Thread Artur Malabarba 
branch: master
commit 2405d7a15c976f1b6768660556839ac3fd78f887
Merge: 64a30e7 c9d8645
Author: Artur Malabarba 
Commit: Artur Malabarba 

Merge commit 'c9d86457d43decf61810006752544d7f7bd5a61d'
---
 packages/beacon/beacon.el |   15 +++
 1 file changed, 11 insertions(+), 4 deletions(-)

diff --git a/packages/beacon/beacon.el b/packages/beacon/beacon.el
index 9a3edac..2c33d5e 100644
--- a/packages/beacon/beacon.el
+++ b/packages/beacon/beacon.el
@@ -5,7 +5,7 @@
 ;; Author: Artur Malabarba 
 ;; URL: https://github.com/Malabarba/beacon
 ;; Keywords: convenience
-;; Version: 1.3.1
+;; Version: 1.3.2
 ;; Package-Requires: ((seq "2.14"))
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -147,7 +147,13 @@ For instance, if you want to disable beacon on buffers 
where
 (add-hook \\='beacon-dont-blink-predicates
   (lambda () (bound-and-true-p hl-line-mode)))")
 
+(defun beacon--compilation-mode-p ()
+  "Non-nil if this is some form of compilation mode."
+  (or (derived-mode-p 'compilation-mode)
+  (bound-and-true-p compilation-minor-mode)))
+
 (add-hook 'beacon-dont-blink-predicates #'window-minibuffer-p)
+(add-hook 'beacon-dont-blink-predicates #'beacon--compilation-mode-p)
 
 (defcustom beacon-dont-blink-major-modes '(t magit-status-mode magit-popup-mode
inf-ruby-mode
@@ -280,9 +286,10 @@ Only returns `beacon-size' elements."
(color-distance "white" bg)))
(make-list 3 (* beacon-color 65535)))
   (t (make-list 3 (* (- 1 beacon-color) 65535))
-(apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b))
-   (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt bg 
n
-   [0 1 2]
+(when bg
+  (apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b))
+ (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt 
bg n
+ [0 1 2])
 
 
 ;;; Blinking

[elpa] master c9cc62d 2/5: Merge pull request #50 from DamienCassou/fix-crash-in-emacs-daemon

2016-10-12 Thread Artur Malabarba 
branch: master
commit c9cc62d42ef0c14079c97890bdd402c8efa4e52b
Merge: aaeb619 913086b
Author: Artur Malabarba 
Commit: GitHub 

Merge pull request #50 from DamienCassou/fix-crash-in-emacs-daemon

Don't crash when Emacs runs as a daemon
---
 beacon.el |7 ---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/beacon.el b/beacon.el
index 9a3edac..93e6646 100644
--- a/beacon.el
+++ b/beacon.el
@@ -280,9 +280,10 @@ Only returns `beacon-size' elements."
(color-distance "white" bg)))
(make-list 3 (* beacon-color 65535)))
   (t (make-list 3 (* (- 1 beacon-color) 65535))
-(apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b))
-   (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt bg 
n
-   [0 1 2]
+(when bg
+  (apply #'seq-mapn (lambda (r g b) (format "#%04x%04x%04x" r g b))
+ (mapcar (lambda (n) (butlast (beacon--int-range (elt fg n) (elt 
bg n
+ [0 1 2])
 
 
 ;;; Blinking

[elpa] master updated (64a30e7 -> 2405d7a)

2016-10-12 Thread Artur Malabarba 
malabarba pushed a change to branch master.

  from  64a30e7   debbugs-gnu.el: Add "26.1"
   new  913086b   Don't crash when Emacs runs as a daemon
   new  c9cc62d   Merge pull request #50 from 
DamienCassou/fix-crash-in-emacs-daemon
   new  31ded26   Don't blink in compilation modes
   new  c9d8645   Version 1.3.2
   new  2405d7a   Merge commit 'c9d86457d43decf61810006752544d7f7bd5a61d'


Summary of changes:
 packages/beacon/beacon.el |   15 +++
 1 file changed, 11 insertions(+), 4 deletions(-)

[elpa] master c9d8645 4/5: Version 1.3.2

2016-10-12 Thread Artur Malabarba 
branch: master
commit c9d86457d43decf61810006752544d7f7bd5a61d
Author: Artur Malabarba 
Commit: Artur Malabarba 

Version 1.3.2
---
 beacon.el |2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/beacon.el b/beacon.el
index 51bb677..2c33d5e 100644
--- a/beacon.el
+++ b/beacon.el
@@ -5,7 +5,7 @@
 ;; Author: Artur Malabarba 
 ;; URL: https://github.com/Malabarba/beacon
 ;; Keywords: convenience
-;; Version: 1.3.1
+;; Version: 1.3.2
 ;; Package-Requires: ((seq "2.14"))
 
 ;; This program is free software; you can redistribute it and/or modify

[elpa] master 31ded26 3/5: Don't blink in compilation modes

2016-10-12 Thread Artur Malabarba 
branch: master
commit 31ded26892f2bd2a62d14e027c27986c5a164f8f
Author: Artur Malabarba 
Commit: Artur Malabarba 

Don't blink in compilation modes
---
 beacon.el |6 ++
 1 file changed, 6 insertions(+)

diff --git a/beacon.el b/beacon.el
index 93e6646..51bb677 100644
--- a/beacon.el
+++ b/beacon.el
@@ -147,7 +147,13 @@ For instance, if you want to disable beacon on buffers 
where
 (add-hook \\='beacon-dont-blink-predicates
   (lambda () (bound-and-true-p hl-line-mode)))")
 
+(defun beacon--compilation-mode-p ()
+  "Non-nil if this is some form of compilation mode."
+  (or (derived-mode-p 'compilation-mode)
+  (bound-and-true-p compilation-minor-mode)))
+
 (add-hook 'beacon-dont-blink-predicates #'window-minibuffer-p)
+(add-hook 'beacon-dont-blink-predicates #'beacon--compilation-mode-p)
 
 (defcustom beacon-dont-blink-major-modes '(t magit-status-mode magit-popup-mode
inf-ruby-mode

[elpa] master 64a30e7: debbugs-gnu.el: Add "26.1"

2016-10-12 Thread Michael Albinus 
branch: master
commit 64a30e7eac927cd3be862c4224ee95ff0478e1ad
Author: Michael Albinus 
Commit: Michael Albinus 

debbugs-gnu.el: Add "26.1"

* packages/debbugs/debbugs-gnu.el (debbugs-gnu-emacs-current-release):
(debbugs-gnu-emacs-blocking-reports): Add "26.1".
---
 packages/debbugs/debbugs-gnu.el |8 +---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/packages/debbugs/debbugs-gnu.el b/packages/debbugs/debbugs-gnu.el
index 058f6fd..908d93e 100644
--- a/packages/debbugs/debbugs-gnu.el
+++ b/packages/debbugs/debbugs-gnu.el
@@ -358,13 +358,15 @@ The specification which bugs shall be suppressed is taken 
from
   :group 'debbugs-gnu
   :type '(choice (const "24.5")
 (const "25.1")
-(const "25.2"))
-  :version "25.1")
+(const "25.2")
+(const "26.1"))
+  :version "25.2")
 
 (defconst debbugs-gnu-emacs-blocking-reports
   '(("24.5" . 19758)
 ("25.1" . 19759)
-("25.2" . 21966))
+("25.2" . 21966)
+("26.1" . 24655))
   "The IDs of the Emacs report used to track blocking bug reports.
 It is a list of cons cells, each one containing the Emacs
 version (a string) and the bug report number (a number).")