[elpa] externals/metar b8949ce 02/16: Fix phenomena decoding

[Stefan Monnier]

branch: externals/metar
commit b8949ceaaa76d5c1dfbd6d81d913f8eee6a6d559
Author: Mario Lang <mlang@delysid.org>
Commit: Mario Lang <mlang@delysid.org>

    Fix phenomena decoding
---
 metar.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/metar.el b/metar.el
index 3a04b47..cbba5f8 100644
--- a/metar.el
+++ b/metar.el
@@ -388,7 +388,7 @@ If no record was found for STATION, nil is returned."
             (cons 'humidity humidity)
             (cons 'pressure pressure))
        (when (metar-phenomena codes)
-        (list 'phenomena (metar-phenomena codes)))))))
+        (list (cons 'phenomena (metar-phenomena codes))))))))
 
 (defun metar-magnus-formula-humidity-from-dewpoint (temperature dewpoint)
   "Calculate relative humidity (in %) from TEMPERATURE and DEWPOINT (in
@@ -450,7 +450,8 @@ Otherwise, determine the best station via 
latitude/longitude."
                   (cadr (assoc 'temperature info))
                   (cadr (assoc 'humidity info))
                   (if (assoc 'phenomena info)
-                      (concat ", " (cdr (assoc 'phenomena info)))
+                      (concat "\n" "Phenomena: "
+                              (cdr (assoc 'phenomena info)))
                     ""))
        (message "No weather information found, sorry.")))))