From a36514d8830ef9598a8d9b20f6296eedbcdd0863 Mon Sep 17 00:00:00 2001 From: Yuanle Song <sylecn@gmail.com> Date: Thu, 10 Oct 2019 00:39:44 +0800 Subject: [PATCH] v1.2.2 remove usage of cl-lib; change (require 'cl-macs) to (eval-when-compile (require 'cl-macs)) --- zero-framework.el | 4 ++-- zero-pinyin-service.el | 3 +-- zero-pinyin.el | 1 - 3 files changed, 3 insertions(+), 5 deletions(-) diff --git a/zero-framework.el b/zero-framework.el index 1119b31..73d03c6 100644 --- a/zero-framework.el +++ b/zero-framework.el @@ -35,7 +35,7 @@ ;; dependencies ;;============== -(require 'cl-macs) +(eval-when-compile (require 'cl-macs)) (require 's) (require 'zero-panel) @@ -140,7 +140,7 @@ If item is not in lst, return nil." ;; zero-el version (defvar zero-version nil "zero-el package version.") -(setq zero-version "1.2.1") +(setq zero-version "1.2.2") ;; FSM state (defconst *zero-state-im-off* 'IM-OFF) diff --git a/zero-pinyin-service.el b/zero-pinyin-service.el index 0ee66c3..8b1189e 100644 --- a/zero-pinyin-service.el +++ b/zero-pinyin-service.el @@ -22,7 +22,6 @@ ;;================ (require 'dbus) -(require 'cl-lib) (defun zero-pinyin-service-error-handler (event error) "Handle dbus errors." @@ -115,7 +114,7 @@ DELETE-CANDIDATE-COMPLETE the async handler function." ;; some app test ;;================ -(require 'cl-macs) +(eval-when-compile (require 'cl-macs)) (ert-deftest zero-pinyin-service-get-candidates () (cl-destructuring-bind (cs ls &rest rest) diff --git a/zero-pinyin.el b/zero-pinyin.el index 36b70cd..bbea2e3 100644 --- a/zero-pinyin.el +++ b/zero-pinyin.el @@ -30,7 +30,6 @@ (require 's) (require 'zero-framework) (require 'zero-pinyin-service) -(require 'cl-lib) ;;=============================== ;; basic data and emacs facility -- GitLab