[elpa] externals/exwm 74fba56: Do not wait for WM_STATE property events

2016-02-26 Thread Chris Feng
branch: externals/exwm
commit 74fba563b82c1a4d3a589c71041a5bf370709a9e
Author: Chris Feng 
Commit: Chris Feng 

Do not wait for WM_STATE property events

* exwm-layout.el (exwm-layout--show, exwm-layout--hide): Save the state
directly.
---
 exwm-layout.el |   43 ++-
 1 files changed, 22 insertions(+), 21 deletions(-)

diff --git a/exwm-layout.el b/exwm-layout.el
index 09428da..76721a0 100644
--- a/exwm-layout.el
+++ b/exwm-layout.el
@@ -103,7 +103,8 @@
   (xcb:+request exwm--connection
   (make-instance 'xcb:icccm:set-WM_STATE
  :window id :state xcb:icccm:WM_STATE:NormalState
- :icon xcb:Window:None)))
+ :icon xcb:Window:None))
+  (setq exwm-state xcb:icccm:WM_STATE:NormalState))
 (xcb:+request exwm--connection
 (make-instance 'xcb:SendEvent
:propagate 0 :destination id
@@ -122,27 +123,27 @@
 
 (defun exwm-layout--hide (id)
   "Hide window ID."
-  (unless (eq xcb:icccm:WM_STATE:IconicState ;already hidden
-  (with-current-buffer (exwm--id->buffer id) exwm-state))
-(exwm--log "Hide #x%x" id)
-(xcb:+request exwm--connection
-(make-instance 'xcb:ChangeWindowAttributes
-   :window id :value-mask xcb:CW:EventMask
-   :event-mask xcb:EventMask:NoEvent))
-(xcb:+request exwm--connection (make-instance 'xcb:UnmapWindow :window id))
-(xcb:+request exwm--connection
-(make-instance 'xcb:ChangeWindowAttributes
-   :window id :value-mask xcb:CW:EventMask
-   :event-mask exwm--client-event-mask))
-(with-current-buffer (exwm--id->buffer id)
+  (with-current-buffer (exwm--id->buffer id)
+(unless (eq xcb:icccm:WM_STATE:IconicState exwm-state) ;already hidden
+  (exwm--log "Hide #x%x" id)
   (xcb:+request exwm--connection
-  (make-instance 'xcb:UnmapWindow :window exwm--container)))
-(xcb:+request exwm--connection
-(make-instance 'xcb:icccm:set-WM_STATE
-   :window id
-   :state xcb:icccm:WM_STATE:IconicState
-   :icon xcb:Window:None))
-(xcb:flush exwm--connection)))
+  (make-instance 'xcb:ChangeWindowAttributes
+ :window id :value-mask xcb:CW:EventMask
+ :event-mask xcb:EventMask:NoEvent))
+  (xcb:+request exwm--connection (make-instance 'xcb:UnmapWindow :window 
id))
+  (xcb:+request exwm--connection
+  (make-instance 'xcb:ChangeWindowAttributes
+ :window id :value-mask xcb:CW:EventMask
+ :event-mask exwm--client-event-mask))
+  (xcb:+request exwm--connection
+  (make-instance 'xcb:UnmapWindow :window exwm--container))
+  (xcb:+request exwm--connection
+  (make-instance 'xcb:icccm:set-WM_STATE
+ :window id
+ :state xcb:icccm:WM_STATE:IconicState
+ :icon xcb:Window:None))
+  (setq exwm-state xcb:icccm:WM_STATE:IconicState)
+  (xcb:flush exwm--connection
 
 (defvar exwm-workspace--current)
 (defvar exwm-workspace--list)



[elpa] master 70ecad1 1/2: packages/excorporate/excorporate.texi: New manual

2016-02-26 Thread Thomas Fitzsimmons
branch: master
commit 70ecad1ef5aeea76ae4328d2b4fa77986f307d58
Author: Thomas Fitzsimmons 
Commit: Thomas Fitzsimmons 

packages/excorporate/excorporate.texi: New manual

* packages/excorporate/excorporate.texi,
packages/excorporate/excorporate.info,
packages/excorporate/dir: New files.
---
 packages/excorporate/dir  |   18 
 packages/excorporate/excorporate.info |  150 +
 packages/excorporate/excorporate.texi |  146 
 3 files changed, 314 insertions(+), 0 deletions(-)

diff --git a/packages/excorporate/dir b/packages/excorporate/dir
new file mode 100644
index 000..c0433c3
--- /dev/null
+++ b/packages/excorporate/dir
@@ -0,0 +1,18 @@
+This is the file .../info/dir, which contains the
+topmost node of the Info hierarchy, called (dir)Top.
+The first time you invoke Info you start off looking at this node.
+
+File: dir, Node: Top   This is the top of the INFO tree
+
+  This (the Directory node) gives a menu of major topics.
+  Typing "q" exits, "?" lists all Info commands, "d" returns here,
+  "h" gives a primer for first-timers,
+  "mEmacs" visits the Emacs manual, etc.
+
+  In Emacs, you can click mouse button 2 on a menu item or cross reference
+  to select it.
+
+* Menu:
+
+Emacs
+* Excorporate: (excorporate).  Exchange Web Services integration for Emacs.
diff --git a/packages/excorporate/excorporate.info 
b/packages/excorporate/excorporate.info
new file mode 100644
index 000..3111930
--- /dev/null
+++ b/packages/excorporate/excorporate.info
@@ -0,0 +1,150 @@
+This is excorporate.info, produced by makeinfo version 6.0 from
+excorporate.texi.
+
+Copyright (C) 2016 Free Software Foundation, Inc.
+
+ Permission is granted to copy, distribute and/or modify this
+ document under the terms of the GNU Free Documentation License,
+ Version 1.2 or any later version published by the Free Software
+ Foundation; with no Invariant Sections, with the Front-Cover, or
+ Back-Cover Texts.  A copy of the license is included in the section
+ entitled "GNU Free Documentation License" in the Emacs manual.
+
+ This document is part of a collection distributed under the GNU
+ Free Documentation License.  If you want to distribute this
+ document separately from the collection, you can do so by adding a
+ copy of the license to the document, as described in section 6 of
+ the license.
+
+ All Emacs Lisp code contained in this document may be used,
+ distributed, and modified without restriction.
+INFO-DIR-SECTION Emacs
+START-INFO-DIR-ENTRY
+* Excorporate: (excorporate).  Exchange Web Services integration for Emacs.
+END-INFO-DIR-ENTRY
+
+
+File: excorporate.info,  Node: Top,  Next: Installation,  Up: (dir)
+
+Excorporate Manual
+**
+
+Excorporate provides Exchange Web Services (EWS) support for Emacs.
+
+   If the Exchange server you access is configured to provide EWS
+support, then there's a 76% chance that Excorporate will enable you to
+retrieve your calendar entries from the comfort of Emacs.
+
+   The 24% failure rate is because accessing - in particular,
+authenticating against - an Exchange server can be challenging.
+
+   Known to fail are Kerberos/GSSAPI authentication and accessing the
+server through a proxy
+().
+
+   Patches are welcome to enable more of these access scenarios.
+
+* Menu:
+
+* Installation::Getting and installing 'excorporate'.
+* Configuration::   Configuring 'excorporate'.
+* Usage::   Using 'excorporate'.
+* Troubleshooting:: Debugging why a connection failed
+
+
+File: excorporate.info,  Node: Installation,  Next: Configuration,  Prev: Top, 
 Up: Top
+
+1 Installation
+**
+
+Excorporate works on Emacs versions >= 24.1.
+
+Install 'excorporate' from the GNU ELPA repository:
+
+   'M-x package-install RET excorporate'
+
+
+File: excorporate.info,  Node: Configuration,  Next: Usage,  Prev: 
Installation,  Up: Top
+
+2 Configuration
+***
+
+Ideally you won't need to configure Excorporate at all.  On friendly
+Exchange setups, Excorporate can discover the EWS URL automatically.
+
+First try:
+
+   'M-x excorporate'
+
+which will prompt you for the Exchange account email address.  Follow
+the prompts and if all goes well, you'll see a message in the minibuffer
+or in *Messages* saying that the connection is ready.
+
+   If autodiscovery runs out of URLs to try, then customize
+'excorporate-configuration':
+
+   'M-x customize-variable RET excorporate-configuration'
+
+   From the value menu select "Skip autodiscovery".  This allows you to
+enter the Exchange account email address and the EWS URL directly.  The
+EWS URL is of the form 'https://mail.gnu.org/ews/exchange.asmx'.
+
+   After saving the configuration, try 'M-x excorporate' again.
+
+   If that doesn't work, then you're pro

[elpa] master updated (6d0fecb -> 04ab676)

2016-02-26 Thread Thomas Fitzsimmons
fitzsim pushed a change to branch master.

  from  6d0fecb   * sed-mode: New package
   new  70ecad1   packages/excorporate/excorporate.texi: New manual
   new  04ab676   packages/excorporate/excorporate.el: Bump version to 0.7.1


Summary of changes:
 packages/{gnorb => excorporate}/dir   |2 +-
 packages/excorporate/excorporate.el   |2 +-
 packages/excorporate/excorporate.info |  150 +
 packages/excorporate/excorporate.texi |  146 
 4 files changed, 298 insertions(+), 2 deletions(-)
 copy packages/{gnorb => excorporate}/dir (87%)
 create mode 100644 packages/excorporate/excorporate.info
 create mode 100644 packages/excorporate/excorporate.texi



[elpa] master 04ab676 2/2: packages/excorporate/excorporate.el: Bump version to 0.7.1

2016-02-26 Thread Thomas Fitzsimmons
branch: master
commit 04ab676879ef4970882d3262b396661d8cbc8e11
Author: Thomas Fitzsimmons 
Commit: Thomas Fitzsimmons 

packages/excorporate/excorporate.el: Bump version to 0.7.1
---
 packages/excorporate/excorporate.el |2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

diff --git a/packages/excorporate/excorporate.el 
b/packages/excorporate/excorporate.el
index 80f3c33..69585d6 100644
--- a/packages/excorporate/excorporate.el
+++ b/packages/excorporate/excorporate.el
@@ -5,7 +5,7 @@
 ;; Author: Thomas Fitzsimmons 
 ;; Maintainer: Thomas Fitzsimmons 
 ;; Created: 2014-09-19
-;; Version: 0.7.0
+;; Version: 0.7.1
 ;; Keywords: calendar
 ;; Homepage: https://www.fitzsim.org/blog/
 ;; Package-Requires: ((emacs "24.1") (fsm "0.2") (soap-client "3.0.2") 
(url-http-ntlm "2.0.2"))



[elpa] master updated (04ab676 -> 4a0b5fb)

2016-02-26 Thread Wolfgang Jenkner
wjenkner pushed a change to branch master.

  from  04ab676   packages/excorporate/excorporate.el: Bump version to 0.7.1
   new  b412fa1   Fix the case where the metar record contains M01 
(bug#19401).
   new  4a0b5fb   Add a work-around for bug#19582, present before Emacs 
24.5.


Summary of changes:
 packages/metar/metar.el |   69 ---
 1 files changed, 35 insertions(+), 34 deletions(-)



[elpa] master b412fa1 1/2: Fix the case where the metar record contains M01 (bug#19401).

2016-02-26 Thread Wolfgang Jenkner
branch: master
commit b412fa19e91319236536883130da66ac3385eab1
Author: Wolfgang Jenkner 
Commit: Wolfgang Jenkner 

Fix the case where the metar record contains M01 (bug#19401).

* packages/metar/metar.el (metar-convert-unit): New optional argument.
(metar-convert-temperature): Use it to rewrite this function in terms of
metar-convert-unit.
Pass t as last argument to the underlying calc conversion functions so
that they return only the number, not the unit, thereby fixing the bug
in question.
---
 packages/metar/metar.el |   66 ++
 1 files changed, 32 insertions(+), 34 deletions(-)

diff --git a/packages/metar/metar.el b/packages/metar/metar.el
index 7b78f07..9575313 100644
--- a/packages/metar/metar.el
+++ b/packages/metar/metar.el
@@ -239,45 +239,43 @@ If no match if found, nil is returned."
   (when station-code
(cons station-code (round best-distance))
 
-(defun metar-convert-unit (value new-unit)
+(defun metar-convert-unit (value new-unit &optional convert-units-function)
   "Convert VALUE to NEW-UNIT.
 VALUE is a string with the value followed by the unit, like \"5 knot\"
-and NEW-UNIT should be a unit name like \"kph\" or similar."
+and NEW-UNIT should be a unit name like \"kph\" or similar.
+CONVERT-UNITS-FUNCTION designates the function actually doing the conversion.
+It must have the signature of `math-convert-units', which is the default."
   (cl-check-type value string)
-  (cl-check-type new-unit (or string symbol))
-  (cl-multiple-value-bind (value unit)
-  (split-string
-   (math-format-value
-   (math-convert-units (math-simplify (math-read-expr value))
-   (math-read-expr
-(cl-etypecase new-unit
-  (string new-unit)
-  (symbol (symbol-name new-unit))
-   " ")
-(cons (string-to-number value) (intern unit
+  (unless (symbolp new-unit)
+(setq new-unit (intern new-unit)))
+  (let ((expr (math-simplify (math-read-expr value
+(cl-assert (or (math-zerop expr)
+  (not (memq (math-single-units-in-expr-p expr) '(nil wrong
+  nil
+  "Metar: Not exactly one unit in expression: %S" expr)
+(let ((res (math-simplify-units
+   (funcall (or convert-units-function 'math-convert-units)
+expr
+(math-build-var-name new-unit)
+t
+  (cl-assert (math-realp res) nil
+"Metar: Not a Calc real number: %S" res)
+  (cons (string-to-number (math-format-value (if (integerp res)
+res
+  (math-float res
+   new-unit
 
 (defun metar-convert-temperature (string &optional unit)
-  (let* ((value (concat (if (= (aref string 0) ?M)
-   (concat "-" (substring string 1))
- string)
-   "degC"))
-(expr (math-read-expr value))
-(old-unit (math-single-units-in-expr-p expr))
-(new-unit (or unit (cdr (assq 'temperature metar-units)
-(if old-unit
-   (cl-multiple-value-bind (value unit)
-   (split-string
-(math-format-value
- (math-simplify-units
-  (math-convert-temperature
-   expr
-   (list 'var
- (car old-unit)
- (intern (concat "var-" (symbol-name (car old-unit)
-   (math-read-expr (cl-etypecase new-unit
- (string new-unit)
- (symbol (symbol-name new-unit))) " ")
- (cons (string-to-number value) (intern unit))
+  (metar-convert-unit (concat (if (= (aref string 0) ?M)
+ (concat "-" (substring string 1))
+   string)
+ "degC")
+ (or unit (cdr (assq 'temperature metar-units)))
+ (lambda (expr new-unit-var pure)
+   (math-convert-temperature expr
+ (math-build-var-name 'degC)
+ new-unit-var
+ pure
 
 (defcustom metar-url
   "http://weather.noaa.gov/pub/data/observations/metar/stations/%s.TXT";



[elpa] master 4a0b5fb 2/2: Add a work-around for bug#19582, present before Emacs 24.5.

2016-02-26 Thread Wolfgang Jenkner
branch: master
commit 4a0b5fb85ecd689346719881e149d1f4341b5da4
Author: Wolfgang Jenkner 
Commit: Wolfgang Jenkner 

Add a work-around for bug#19582, present before Emacs 24.5.

* packages/metar/metar.el (metar-convert-unit): Rewrite expr if it
starts with the `neg' operator.  Technically, this is wrong because
various functions in calc-units expect already simplified
expressions.  In practice, it should work around the above bug.
---
 packages/metar/metar.el |3 +++
 1 files changed, 3 insertions(+), 0 deletions(-)

diff --git a/packages/metar/metar.el b/packages/metar/metar.el
index 9575313..a05a353 100644
--- a/packages/metar/metar.el
+++ b/packages/metar/metar.el
@@ -249,6 +249,9 @@ It must have the signature of `math-convert-units', which 
is the default."
   (unless (symbolp new-unit)
 (setq new-unit (intern new-unit)))
   (let ((expr (math-simplify (math-read-expr value
+;; Sneakily work around bug#19582.
+(when (eq (car-safe expr) 'neg)
+  (setq expr `(* -1 ,(cadr expr
 (cl-assert (or (math-zerop expr)
   (not (memq (math-single-units-in-expr-p expr) '(nil wrong
   nil



[elpa] master 6a92042: * sed-mode/sed-mode.el: Bump up version for first release

2016-02-26 Thread Stefan Monnier
branch: master
commit 6a92042cf61d42328724eaa6bfef7bd334b138c3
Author: Stefan Monnier 
Commit: Stefan Monnier 

* sed-mode/sed-mode.el: Bump up version for first release

(interpreter-mode-alist): Register ourselves.
---
 packages/sed-mode/sed-mode.el |3 ++-
 1 files changed, 2 insertions(+), 1 deletions(-)

diff --git a/packages/sed-mode/sed-mode.el b/packages/sed-mode/sed-mode.el
index ba29bc5..1b35c7a 100644
--- a/packages/sed-mode/sed-mode.el
+++ b/packages/sed-mode/sed-mode.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 2016  Free Software Foundation, Inc.
 
 ;; Author: Stefan Monnier 
-;; Version: 0
+;; Version: 1.0
 ;; Keywords:
 
 ;; This program is free software; you can redistribute it and/or modify
@@ -113,6 +113,7 @@
 ))
 
 ;;;###autoload (add-to-list 'auto-mode-alist '("\\.sed\\'" . sed-mode))
+;;;###autoload (add-to-list 'interpreter-mode-alist '("sed" . sed-mode))
 
 ;;;###autoload
 (define-derived-mode sed-mode prog-mode "Sed"