Upgrade packages

elpa/archives/gnu/archive-contents

@@ -877,7 +877,7 @@
 		  (:keywords "gnome" "c" "coding style")
 		  (:url . "http://elpa.gnu.org/packages/gnome-c-style.html"))])
  (gnorb .
-	[(1 6 5)
+	[(1 6 6)
 	 ((cl-lib
 	   (0 5)))
 	 "Glue code between Gnus, Org, and BBDB" tar
@@ -1396,7 +1396,7 @@
 	       ("Felix Lee <felix8a@gmail.com>, Michal Nazarewicz" . "mina86@mina86.com"))
 	      (:maintainer "Michal Nazarewicz" . "mina86@mina86.com"))])
  (oauth2 .
-	 [(0 12)
+	 [(0 13)
 	  nil "OAuth 2.0 Authorization Protocol" single
 	  ((:url . "http://elpa.gnu.org/packages/oauth2.html")
 	   (:keywords "comm")
@@ -1575,7 +1575,7 @@
 	   ("Mario Lang" . "mlang@delysid.org"))
 	  (:maintainer "Mario Lang" . "mlang@delysid.org"))])
  (posframe .
-	   [(0 6 0)
+	   [(0 7 0)
 	    ((emacs
 	      (26)))
 	    "Pop a posframe (just a frame) at point" single

elpa/archives/gnu/archive-contents.signed

@@ -1 +1 @@
-Good signature from 066DAFCB81E42C40 GNU ELPA Signing Agent (2019) <elpasign@elpa.gnu.org> (trust undefined) created at 2020-03-31T11:05:02+0200 using RSA
+Good signature from 066DAFCB81E42C40 GNU ELPA Signing Agent (2019) <elpasign@elpa.gnu.org> (trust undefined) created at 2020-04-08T23:05:02+0200 using RSA

elpa/elm-mode-20200406.214/elm-font-lock.el

@@ -199,7 +199,7 @@ Also highlights opening brackets without a matching bracket."
               elm--font-lock-operators)
         nil nil))
 
-(defun turn-on-elm-font-lock ()
+(defun elm--font-lock-enable ()
   "Turn on Elm font lock."
   (setq font-lock-multiline t)
   (set-syntax-table elm--syntax-table)

elpa/elm-mode-20200406.214/elm-indent.el

@@ -6,10 +6,6 @@
 
 ;; Author: 1997-1998 Guy Lapalme <lapalme@iro.umontreal.ca>
 
-;; Keywords: indentation Elm layout-rule
-;; Version: 1.2
-;; URL: http://www.iro.umontreal.ca/~lapalme/layout/index.html
-
 ;; This file is not part of GNU Emacs.
 
 ;; This file was adapted from `haskell-indent.el'.
@@ -1233,13 +1229,6 @@ Invokes `elm-indent-hook' if not nil."
     (kill-local-variable 'indent-line-function)
     (kill-local-variable 'indent-region-function)))
 
-;;;###autoload
-(define-obsolete-function-alias 'turn-on-elm-indent 'elm-indent-mode)
-
-(defun turn-off-elm-indent ()
-  "Turn off ``intelligent'' Elm indentation mode."
-  (elm-indent-mode nil))
-
 
 (provide 'elm-indent)
 ;;; elm-indent.el ends here

elpa/elm-mode-20200406.214/elm-interactive.el

@@ -60,7 +60,7 @@ For Elm 0.18 and earlier, set this to '(\"elm-repl\")."
   :group 'elm)
 
 (defvar elm-interactive-prompt-regexp "^[>|] "
-  "Prompt for `run-elm-interactive'.")
+  "Prompt for `elm-interactive'.")
 
 (defcustom elm-reactor-command '("elm" "reactor")
   "The Elm Reactor command.
@@ -253,7 +253,7 @@ Stolen from ‘haskell-mode’."
 
 ;;;###autoload
 (define-derived-mode elm-interactive-mode comint-mode "Elm Interactive"
-  "Major mode for `run-elm-interactive'.
+  "Major mode for `elm-interactive'.
 
 \\{elm-interactive-mode-map}"
 
@@ -263,10 +263,10 @@ Stolen from ‘haskell-mode’."
 
   (add-hook 'comint-output-filter-functions #'elm-interactive--spot-prompt nil t)
 
-  (turn-on-elm-font-lock))
+  (elm--font-lock-enable))
 
 ;;;###autoload
-(defun run-elm-interactive ()
+(defun elm-interactive ()
   "Run an inferior instance of `elm-repl' inside Emacs."
   (interactive)
   (elm-interactive-kill-current-session)
@@ -283,6 +283,9 @@ Stolen from ‘haskell-mode’."
         (setq-local elm-repl--origin origin))
       (pop-to-buffer buffer))))
 
+;;;###autoload
+(define-obsolete-function-alias 'run-elm-interactive 'elm-interactive "2020-04")
+
 (defun elm-repl-return-to-origin ()
   "Jump back to the location from which we last jumped to the repl."
   (interactive)
@@ -301,7 +304,7 @@ of the file specified."
   (interactive)
   (save-buffer)
   (let ((import-statement (elm--build-import-statement)))
-    (run-elm-interactive)
+    (elm-interactive)
     (elm-interactive--send-command ":reset\n")
     (elm-interactive--send-command import-statement)))
 
@@ -311,7 +314,7 @@ of the file specified."
   (interactive "r")
   (let* ((to-push (buffer-substring-no-properties beg end))
          (lines (split-string (s-trim-right to-push) "\n")))
-    (run-elm-interactive)
+    (elm-interactive)
     (dolist (line lines)
       (elm-interactive--send-command (concat line " \\\n")))
     (elm-interactive--send-command "\n")))
@@ -321,7 +324,7 @@ of the file specified."
   "Push the current top level declaration to the REPL."
   (interactive)
   (let ((lines (elm--get-decl)))
-    (run-elm-interactive)
+    (elm-interactive)
     (dolist (line lines)
       (elm-interactive--send-command (concat line " \\\n")))
     (elm-interactive--send-command "\n")))
@@ -342,7 +345,7 @@ of the file specified."
 
 ;;; Reactor:
 ;;;###autoload
-(defun run-elm-reactor ()
+(defun elm-reactor ()
   "Run the Elm reactor process."
   (interactive)
   (let ((default-directory (elm--find-dependency-file-path))
@@ -362,11 +365,14 @@ of the file specified."
         (when proc
           (set-process-filter proc 'comint-output-filter))))))
 
+;;;###autoload
+(define-obsolete-function-alias 'run-elm-reactor 'elm-reactor "2020-04")
+
 (defun elm-reactor--browse (path &optional debug)
   "Open (reactor-relative) PATH in browser with optional DEBUG.
 
 Runs `elm-reactor' first."
-  (run-elm-reactor)
+  (elm-reactor)
   (browse-url (format "http://localhost:%s/%s%s" elm-reactor-port path (if debug "?debug" ""))))
 
 ;;;###autoload
@@ -821,6 +827,43 @@ EXPOSING"
           name
         (concat (or .as module-name) suffix)))))
 
+;;;###autoload
+(defun elm-expose-at-point ()
+  "Exposes identifier at point."
+  (interactive)
+  (save-excursion
+    ;; If already at the beginning of defun then
+    ;; elm-beginning-of-defun will go to previous defun.  Thus we go
+    ;; to the beginning of next defun and come back to make sure we
+    ;; will arrive at correct place.
+    (elm-end-of-defun)
+    (elm-beginning-of-defun)
+    (let* (case-fold-search
+           (expose (cond
+                    ((looking-at (rx "type" (+ space) "alias" (+ space)))
+                     (goto-char (match-end 0))
+                     (word-at-point))
+                    ((looking-at (rx "type" (+ space)))
+                     (goto-char (match-end 0))
+                     (concat (word-at-point)
+                             (if (y-or-n-p "Expose constructors? ")
+                                 "(..)"
+                               "")))
+                    ((or (looking-at (rx (or "port" "module" "import") (+ space)))
+                         (null (word-at-point)))
+                     (user-error "No identifier at point"))
+                    (t (word-at-point)))))
+      (goto-char (point-min))
+      (if (re-search-forward (rx bol "module" (+ (or space))
+                                 upper (* (or word (syntax symbol)))
+                                 (+ (any space ?\n)) "exposing" (+ (any space ?\n)) "(")
+                             nil t)
+          (progn
+            (goto-char (match-end 0))
+            (insert expose)
+            (when (looking-at (rx (* (any space ?\n)) word))
+              (insert ", ")))
+        (error "Couldn't find module declaration")))))
 
 (defun elm-documentation--show (documentation)
   "Show DOCUMENTATION in a help buffer."
@@ -904,7 +947,7 @@ EXPOSING"
 (defun elm-oracle--function-at-point ()
   "Get the name of the function at point."
   (save-excursion
-    (skip-chars-forward "[A-Za-z0-9_.']")
+    (skip-chars-forward "A-Za-z0-9_.'")
     (let* ((_ (re-search-backward elm-oracle--pattern nil t))
            (beg (1+ (match-beginning 0)))
            (end (match-end 0))
@@ -973,7 +1016,7 @@ elm-specific `completion-at-point' function."
                #'elm-oracle-completion-at-point-function))
 
 (defvar ac-sources)
-(defvar ac-source-elm
+(defvar elm-ac-source
   `((candidates . (elm-oracle--get-completions ac-prefix t))
     (prefix . ,elm-oracle--pattern)))
 
@@ -981,19 +1024,19 @@ elm-specific `completion-at-point' function."
 (defun elm-oracle-setup-ac ()
   "Set up auto-complete support.
 Add this function to your `elm-mode-hook'."
-  (add-to-list 'ac-sources 'ac-source-elm))
+  (add-to-list 'ac-sources 'elm-ac-source))
 
 
 (declare-function company-begin-backend "company")
 (declare-function company-doc-buffer "company")
 
 ;;;###autoload
-(defun company-elm (command &optional arg &rest ignored)
+(defun elm-company (command &optional arg &rest ignored)
   "Provide completion info according to COMMAND and ARG.  IGNORED is not used."
   (interactive (list 'interactive))
   (when (derived-mode-p 'elm-mode)
     (cl-case command
-      (interactive (company-begin-backend 'company-elm))
+      (interactive (company-begin-backend 'elm-company))
       (sorted t)
       (prefix (elm-oracle--completion-prefix-at-point))
       (doc-buffer (elm-company--docbuffer arg))
@@ -1001,6 +1044,9 @@ Add this function to your `elm-mode-hook'."
       (annotation (elm-company--signature arg))
       (meta (elm-company--meta arg)))))
 
+;;;###autoload
+(define-obsolete-function-alias 'company-elm 'elm-company "2020-04")
+
 (defun elm-company--candidates (prefix &optional callback)
   "Function providing candidates for company-mode for given PREFIX.
 Passes completions to CALLBACK if present, otherwise returns them."

elpa/elm-mode-20200406.214/elm-mode-autoloads.el

@@ -9,7 +9,7 @@
 ;;;### (autoloads nil "elm-font-lock" "elm-font-lock.el" (0 0 0 0))
 ;;; Generated autoloads from elm-font-lock.el
 
-(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "elm-font-lock" '("turn-on-elm-font-lock" "elm-")))
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "elm-font-lock" '("elm-")))
 
 ;;;***
 
@@ -53,9 +53,7 @@ Invokes `elm-indent-hook' if not nil.
 
 \(fn &optional ARG)" t nil)
 
-(define-obsolete-function-alias 'turn-on-elm-indent 'elm-indent-mode)
-
-(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "elm-indent" '("turn-off-elm-indent" "elm-indent-")))
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "elm-indent" '("elm-indent-")))
 
 ;;;***
 
@@ -64,17 +62,19 @@ Invokes `elm-indent-hook' if not nil.
 ;;; Generated autoloads from elm-interactive.el
 
 (autoload 'elm-interactive-mode "elm-interactive" "\
-Major mode for `run-elm-interactive'.
+Major mode for `elm-interactive'.
 
 \\{elm-interactive-mode-map}
 
 \(fn)" t nil)
 
-(autoload 'run-elm-interactive "elm-interactive" "\
+(autoload 'elm-interactive "elm-interactive" "\
 Run an inferior instance of `elm-repl' inside Emacs.
 
 \(fn)" t nil)
 
+(define-obsolete-function-alias 'run-elm-interactive 'elm-interactive "2020-04")
+
 (autoload 'elm-repl-load "elm-interactive" "\
 Load an interactive REPL if there isn't already one running.
 Changes the current root directory to be the directory with the closest
@@ -93,11 +93,13 @@ Push the current top level declaration to the REPL.
 
 \(fn)" t nil)
 
-(autoload 'run-elm-reactor "elm-interactive" "\
+(autoload 'elm-reactor "elm-interactive" "\
 Run the Elm reactor process.
 
 \(fn)" t nil)
 
+(define-obsolete-function-alias 'run-elm-reactor 'elm-reactor "2020-04")
+
 (autoload 'elm-preview-buffer "elm-interactive" "\
 Preview the current buffer using Elm reactor (in debug mode if DEBUG is truthy).
 
@@ -153,6 +155,11 @@ Import a module, refreshing if REFRESH is truthy.
 
 \(fn REFRESH)" t nil)
 
+(autoload 'elm-expose-at-point "elm-interactive" "\
+Exposes identifier at point.
+
+\(fn)" t nil)
+
 (autoload 'elm-documentation-lookup "elm-interactive" "\
 Lookup the documentation for a function, refreshing if REFRESH is truthy.
 
@@ -198,17 +205,19 @@ Add this function to your `elm-mode-hook'.
 
 \(fn)" nil nil)
 
-(autoload 'company-elm "elm-interactive" "\
+(autoload 'elm-company "elm-interactive" "\
 Provide completion info according to COMMAND and ARG.  IGNORED is not used.
 
 \(fn COMMAND &optional ARG &rest IGNORED)" t nil)
 
+(define-obsolete-function-alias 'company-elm 'elm-company "2020-04")
+
 (autoload 'elm-test-project "elm-interactive" "\
 Run the elm-test command on the current project.
 
 \(fn)" t nil)
 
-(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "elm-interactive" '("elm-" "ac-source-elm")))
+(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "elm-interactive" '("elm-")))
 
 ;;;***
 

elpa/elm-mode-20200406.214/elm-mode-pkg.el

@@ -1,4 +1,4 @@
-(define-package "elm-mode" "20200301.19" "Major mode for Elm"
+(define-package "elm-mode" "20200406.214" "Major mode for Elm"
   '((f "0.17")
     (s "1.7.0")
     (emacs "25.1")

elpa/elm-mode-20200406.214/elm-mode.el

@@ -126,7 +126,7 @@ Find the roots of this function in the c-awk-mode."
     (define-key map (kbd "C-c C-l") 'elm-repl-load)
     (define-key map (kbd "C-c C-p") 'elm-repl-push)
     (define-key map (kbd "C-c C-e") 'elm-repl-push-decl)
-    (define-key map (kbd "C-c C-z") 'run-elm-interactive)
+    (define-key map (kbd "C-c C-z") 'elm-interactive)
     (define-key map (kbd "C-c C-a") 'elm-compile-add-annotations)
     (define-key map (kbd "C-c C-r") 'elm-compile-clean-imports)
     (define-key map (kbd "C-c C-c") 'elm-compile-buffer)
@@ -168,7 +168,7 @@ Find the roots of this function in the c-awk-mode."
     (elm-format-on-save-mode))
   (add-hook 'after-save-hook #'elm-mode-after-save-handler nil t)
 
-  (turn-on-elm-font-lock))
+  (elm--font-lock-enable))
 
 ;; We enable intelligent indenting, but users can remove this from the
 ;; hook if they prefer.

elpa/leuven-theme-20200406.1341/leuven-theme-pkg.el

@@ -1,4 +1,4 @@
-(define-package "leuven-theme" "20200122.1934" "Awesome Emacs color theme on white background" 'nil :keywords
+(define-package "leuven-theme" "20200406.1341" "Awesome Emacs color theme on white background" 'nil :keywords
   '("color" "theme")
   :authors
   '(("Fabrice Niessen <(concat \"fniessen\" at-sign \"pirilampo.org\")>"))

elpa/leuven-theme-20200406.1341/leuven-theme.el

@@ -4,7 +4,7 @@
 
 ;; Author: Fabrice Niessen <(concat "fniessen" at-sign "pirilampo.org")>
 ;; URL: https://github.com/fniessen/emacs-leuven-theme
-;; Version: 20200102.2050
+;; Version: 20200406.1540
 ;; Keywords: color theme
 
 ;; This file is part of GNU Emacs.
@@ -766,7 +766,7 @@ more...")
    `(org-example ((,class (:foreground "blue" :background "#EAFFEA"))))
    `(org-footnote ((,class (:underline t :foreground "#008ED1"))))
    `(org-formula ((,class (:foreground "chocolate1"))))
-   `(org-headline-done ((,class (:height 1.0 :weight normal :strike-through t :foreground "#ADADAD"))))
+   `(org-headline-done ((,class (:height 1.0 :weight normal :foreground "#ADADAD"))))
    `(org-hide ((,class (:foreground "#E2E2E2"))))
    `(org-inlinetask ((,class (:box (:line-width 1 :color "#EBEBEB") :foreground "#777777" :background "#FFFFD6"))))
    `(org-latex-and-related ((,class (:foreground "#336699" :background "white"))))

elpa/magit-20200401.2225/magit.info

@@ -1,192 +0,0 @@
-This is magit.info, produced by makeinfo version 6.5 from magit.texi.
-
-     Copyright (C) 2015-2020 Jonas Bernoulli <jonas@bernoul.li>
-
-     You can redistribute this document and/or modify it under the terms
-     of the GNU General Public License as published by the Free Software
-     Foundation, either version 3 of the License, or (at your option)
-     any later version.
-
-     This document is distributed in the hope that it will be useful,
-     but WITHOUT ANY WARRANTY; without even the implied warranty of
-     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-     General Public License for more details.
-
-INFO-DIR-SECTION Emacs
-START-INFO-DIR-ENTRY
-* Magit: (magit).       Using Git from Emacs with Magit.
-END-INFO-DIR-ENTRY
-
-
-Indirect:
-magit.info-1: 754
-magit.info-2: 302693
-
-Tag Table:
-(Indirect)
-Node: Top754
-Node: Introduction6439
-Node: Installation11162
-Node: Installing from Melpa11492
-Node: Installing from the Git Repository12565
-Node: Post-Installation Tasks14913
-Node: Getting Started16198
-Node: Interface Concepts21647
-Node: Modes and Buffers22008
-Node: Switching Buffers23757
-Node: Naming Buffers28508
-Node: Quitting Windows31815
-Node: Automatic Refreshing of Magit Buffers33561
-Node: Automatic Saving of File-Visiting Buffers36413
-Node: Automatic Reverting of File-Visiting Buffers37598
-Node: Risk of Reverting Automatically42593
-Node: Sections44975
-Node: Section Movement45901
-Node: Section Visibility50811
-Node: Section Hooks56888
-Node: Section Types and Values59295
-Node: Section Options60598
-Node: Transient Commands61070
-Node: Transient Arguments and Buffer Variables62307
-Node: Completion Confirmation and the Selection69325
-Node: Action Confirmation69769
-Node: Completion and Confirmation77119
-Node: The Selection80305
-Node: The hunk-internal region83204
-Node: Support for Completion Frameworks84293
-Node: Additional Completion Options89200
-Node: Running Git89799
-Node: Viewing Git Output90072
-Node: Git Process Status91205
-Node: Running Git Manually92170
-Node: Git Executable94640
-Node: Global Git Arguments96922
-Node: Inspecting97728
-Node: Status Buffer98885
-Node: Status Sections102875
-Node: Status Header Sections108427
-Node: Status Module Sections111057
-Node: Status Options113562
-Node: Repository List115031
-Node: Logging118069
-Node: Refreshing Logs120632
-Node: Log Buffer122078
-Node: Log Margin125934
-Node: Select from Log129113
-Node: Reflog131338
-Node: Cherries132995
-Node: Diffing134843
-Node: Refreshing Diffs137924
-Node: Commands Available in Diffs141503
-Node: Diff Options144039
-Node: Revision Buffer149077
-Node: Ediffing152407
-Node: References Buffer156055
-Node: References Sections166575
-Node: Bisecting167436
-Node: Visiting Files and Blobs169249
-Node: General-Purpose Visit Commands169719
-Node: Visiting Files and Blobs from a Diff170675
-Node: Blaming174134
-Node: Manipulating180697
-Node: Creating Repository181039
-Node: Cloning Repository181594
-Node: Staging and Unstaging186837
-Node: Staging from File-Visiting Buffers190920
-Node: Applying192088
-Node: Committing193981
-Node: Initiating a Commit194564
-Node: Editing Commit Messages197949
-Node: Using the Revision Stack200752
-Node: Commit Pseudo Headers203803
-Node: Commit Mode and Hooks205139
-Node: Commit Message Conventions208077
-Node: Branching210205
-Node: The Two Remotes210431
-Node: Branch Commands213084
-Node: Branch Git Variables225467
-Node: Auxiliary Branch Commands230858
-Node: Merging231976
-Node: Resolving Conflicts235984
-Node: Rebasing240985
-Node: Editing Rebase Sequences245844
-Node: Information About In-Progress Rebase250172
-Ref: Information About In-Progress Rebase-Footnote-1259054
-Node: Cherry Picking259650
-Node: Reverting263981
-Node: Resetting265430
-Node: Stashing267084
-Node: Transferring271785
-Node: Remotes272007
-Node: Remote Commands272159
-Node: Remote Git Variables276240
-Node: Fetching277519
-Node: Pulling280006
-Node: Pushing281052
-Node: Plain Patches284522
-Node: Maildir Patches286013
-Node: Miscellaneous287527
-Node: Tagging287843
-Node: Notes289771
-Node: Submodules292143
-Node: Listing Submodules292361
-Node: Submodule Transient294289
-Node: Subtree296811
-Node: Worktree298787
-Node: Common Commands299892
-Node: Wip Modes302693
-Node: Wip Graph307626
-Node: Legacy Wip Modes309940
-Node: Minor Mode for Buffers Visiting Files312835
-Node: Minor Mode for Buffers Visiting Blobs319936
-Node: Customizing320749
-Node: Per-Repository Configuration322345
-Node: Essential Settings324600
-Node: Safety324924
-Node: Performance326685
-Node: Microsoft Windows Performance334323
-Node: MacOS Performance335514
-Ref: MacOS Performance-Footnote-1336529
-Node: Plumbing336611
-Node: Calling Git337440
-Node: Getting a Value from Git338965
-Node: Calling Git for Effect342051
-Node: Section Plumbing348571
-Node: Creating Sections348799
-Node: Section Selection352699
-Node: Matching Sections354498
-Node: Refreshing Buffers360471
-Node: Conventions363619
-Node: Theming Faces363811
-Node: FAQ371926
-Node: FAQ - How to ...?372368
-Node: How to show git's output?372728
-Node: How to install the gitman info manual?373482
-Node: How to show diffs for gpg-encrypted files?374452
-Node: How does branching and pushing work?375048
-Node: Can Magit be used as ediff-version-control-package?375411
-Node: FAQ - Issues and Errors377400
-Node: Magit is slow378296
-Node: I changed several thousand files at once and now Magit is unusable378510
-Node: I am having problems committing379239
-Node: I am using MS Windows and cannot push with Magit379720
-Node: I am using OS X and SOMETHING works in shell but not in Magit380337
-Node: Expanding a file to show the diff causes it to disappear381168
-Node: Point is wrong in the COMMIT_EDITMSG buffer381749
-Node: The mode-line information isn't always up-to-date382795
-Node: A branch and tag sharing the same name breaks SOMETHING383877
-Node: My Git hooks work on the command-line but not inside Magit384763
-Node: git-commit-mode isn't used when committing from the command-line385609
-Node: Point ends up inside invisible text when jumping to a file-visiting buffer387876
-Node: Debugging Tools388674
-Node: Keystroke Index390853
-Node: Command Index424837
-Node: Function Index461862
-Node: Variable Index478214
-
-End Tag Table
-
-
-Local Variables:
-coding: utf-8
-End:

elpa/magit-20200408.2341/magit-pkg.el

@@ -1,4 +1,4 @@
-(define-package "magit" "20200401.2225" "A Git porcelain inside Emacs."
+(define-package "magit" "20200408.2341" "A Git porcelain inside Emacs."
   '((emacs "25.1")
     (async "20180527")
     (dash "20180910")