[nongnu] elpa/datetime f183e03d1e 003/147: Silence a few warnings issued by 'flycheck'

[ELPA Syncer]

branch: elpa/datetime
commit f183e03d1e05c3d8387e41c5e47d3b5a83883fe6
Author: Paul Pogonyshev <pogonyshev@gmail.com>
Commit: Paul Pogonyshev <pogonyshev@gmail.com>

    Silence a few warnings issued by 'flycheck'
---
 datetime.el | 11 +++++++----
 1 file changed, 7 insertions(+), 4 deletions(-)

diff --git a/datetime.el b/datetime.el
index be2a7bc6c7..2a332fd6a6 100644
--- a/datetime.el
+++ b/datetime.el
@@ -1,4 +1,4 @@
-;;; datetime.el --- Library for parsing, formatting and matching timestamps  
-*- lexical-binding: t -*-
+;;; datetime.el --- Parsing, formatting and matching timestamps  -*- 
lexical-binding: t -*-
 
 ;; Copyright (C) 2016 Paul Pogonyshev
 
@@ -89,6 +89,10 @@
 (define-error 'datetime-unsupported-timezone "Timezones are currently not 
supported")
 
 
+;; Set at the end of this file because the initializer is huge.
+(defvar datetime--locale-data nil
+  "Don't access directly, use `datetime-locale-field' instead.")
+
 (defvar datetime--pattern-parsers '((parsed . (lambda (pattern options) 
pattern))
                                     (java   . datetime--parse-java-pattern)))
 
@@ -583,7 +587,7 @@ Supported fields:
 ;;   - all patterns have the following fallbacks: `:short' defaults to
 ;;     `:medium', `:long' defaults to `:medium', `:full' defaults to
 ;;     `:long'.
-(defvar datetime--locale-data
+(setq datetime--locale-data
   '((ar
      :eras                     ["ق.م" "م"]
      :month-context-abbr       ["ينا" "فبر" "مار" "أبر" "ماي" "يون" "يول" 
"أغس" "سبت" "أكت" "نوف" "ديس"]
@@ -1255,8 +1259,7 @@ Supported fields:
      :eras                     ["西元前" "西元"]
      :month-standalone-abbr    ["1月" "2月" "3月" "4月" "5月" "6月" "7月" "8月" "9月" 
"10月" "11月" "12月"]
      :date-patterns            (:medium "yyyy/M/d" :long "yyyy'年'M'月'd'日'" 
:full "yyyy'年'M'月'd'日' EEEE")
-     :time-patterns            (:short "a h:mm" :medium "a hh:mm:ss" :long 
"ahh'時'mm'分'ss'秒'" :full "ahh'時'mm'分'ss'秒' z")))
-  "Don't access directly, use `datetime-locale-field' instead.")
+     :time-patterns            (:short "a h:mm" :medium "a hh:mm:ss" :long 
"ahh'時'mm'分'ss'秒'" :full "ahh'時'mm'分'ss'秒' z"))))
 
 
 (provide 'datetime)