Byte compiler - fix definition warnings

This commit is contained in:
contrapunctus 2019-11-21 11:57:54 +05:30
parent e37646d367
commit d38e6c2030
9 changed files with 34 additions and 4 deletions

View File

@ -11,6 +11,8 @@
(require 'chronometrist-report-custom)
(require 'chronometrist-time)
(declare-function chronometrist-last-expr "chronometrist-sexp.el")
;; ## VARIABLES ##
;;; Code:

View File

@ -21,6 +21,8 @@
;;
;;; Code:
(require 'chronometrist-events)
(require 'chronometrist-common)
(defvar chronometrist-diary-buffer-name "*Chronometrist-Diary*"
"Name for the buffer created by `chronometrist-diary'.")

View File

@ -3,7 +3,7 @@
;; Author: contrapunctus <xmpp:contrapunctus@jabber.fr>
(require 'chronometrist-plist-pp)
(require 'subr-x)
(require 'chronometrist-common)
;;; Commentary:
;;

View File

@ -7,6 +7,8 @@
;;; Code:
(require 'cl-lib)
(defvar chronometrist-migrate-table (make-hash-table))
;; TODO - support other timeclock codes (currently only "i" and "o"
@ -60,6 +62,8 @@ See `timeclock-log-data' for a description."
(goto-char (point-at-bol))))
nil)))
(defvar timeclock-file)
(defun chronometrist-migrate-timelog-file->sexp-file (&optional in-file out-file)
"Migrate your existing `timeclock-file' to the Chronometrist file format.

View File

@ -5,11 +5,16 @@
;;; Commentary:
;;
(require 'filenotify)
(require 'subr-x)
(require 'chronometrist-common)
(require 'chronometrist-queries)
(require 'chronometrist-timer)
(require 'chronometrist-report-custom)
(require 'chronometrist-migrate)
(declare-function chronometrist-refresh-file "chronometrist.el")
;; TODO - improve first-run (no file, or no data in file) behaviour
;; TODO - add support for custom week start day to

View File

@ -1,11 +1,16 @@
;;; chronometrist-sexp.el --- S-expression backend for Chronometrist -*- lexical-binding: t; -*-
(require 'cl-lib)
(require 'subr-x)
(require 'dash)
(require 'seq)
(require 'chronometrist-migrate)
(require 'chronometrist-events)
(require 'chronometrist-plist-pp)
(require 'dash)
(require 'seq)
(require 'chronometrist-common)
(declare-function chronometrist-refresh "chronometrist.el")
;;; Commentary:
;;
@ -16,6 +21,10 @@
"Suggestions for tags.
Used as history by `chronometrist-tags-prompt'.")
(defvar chronometrist--value-suggestions nil
"Suggestions for values.
Used as history by `chronometrist--value-suggestions'.")
(defun chronometrist-plist-remove (plist &rest keys)
"Return PLIST with KEYS and their associated values removed."
(let ((keys (--filter (plist-member plist it) keys)))

View File

@ -7,6 +7,8 @@
(require 'parse-time)
(require 'cl-lib)
(require 'filenotify)
(require 'chronometrist-common)
(require 'chronometrist-time)
(require 'chronometrist-timer)
@ -15,6 +17,8 @@
(require 'chronometrist-migrate)
(require 'chronometrist-queries)
(declare-function chronometrist-refresh-file "chronometrist.el")
;; for each activity -
;; [x] days active - int (float percent)
;; - get days in range - count days on which worked on activity
@ -158,6 +162,8 @@ reduced to the desired range using
(setq chronometrist-statistics--ui-state `(:mode week :start ,start :end ,end))
(chronometrist-statistics-entries-internal table)))))
(defvar chronometrist-statistics-mode-map nil)
(defun chronometrist-statistics-print-keybind (command &optional description firstonly)
"Insert the keybindings for COMMAND.
If DESCRIPTION is non-nil, insert that too.

View File

@ -7,8 +7,8 @@
;;; Code:
(require 'chronometrist-custom)
(require 'chronometrist-common)
(declare-function chronometrist-current-task "chronometrist.el")
(declare-function chronometrist-refresh "chronometrist.el")
(declare-function chronometrist-report-refresh "chronometrist-report.el")
(declare-function chronometrist-statistics-refresh "chronometrist-statistics.el")

View File

@ -6,6 +6,8 @@
(require 'filenotify)
(require 'cl-lib)
(require 'subr-x)
(require 'chronometrist-common)
(require 'chronometrist-timer)
(require 'chronometrist-custom)