Fix some warnings

- Add dependency on org-mode in case I ever install this as a package.
- Require org for `org-collect-keywords', `org-timestamp-to-time',
  `org-timestamp-from-string', and `org-html-export-as-html'.
- Move definition of `tekuti-host' to before it's used.
- Rename `args' to `_' to signify it's not used for anything.
This commit is contained in:
Tom Willemse 2021-06-24 21:19:25 -07:00
parent 0aee0a3631
commit 7b5322b313

View file

@ -4,6 +4,7 @@
;; Author: Tom Willemse <chelys@data> ;; Author: Tom Willemse <chelys@data>
;; Keywords: comm ;; Keywords: comm
;; Package-Requires: (org)
;; This program is free software; you can redistribute it and/or modify ;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by ;; it under the terms of the GNU General Public License as published by
@ -39,6 +40,10 @@
;;; Code: ;;; Code:
(require 'org)
(defvar tekuti-host "http://127.0.0.1:8080")
(defun tekuti--format-date (date) (defun tekuti--format-date (date)
"Format DATE into a date that tekuti understands." "Format DATE into a date that tekuti understands."
(format-time-string "%a, %d %b %Y %H:%M:%S %Z" (format-time-string "%a, %d %b %Y %H:%M:%S %Z"
@ -83,9 +88,7 @@
`(("Content-Type" . "application/x-www-form-urlencoded"))) `(("Content-Type" . "application/x-www-form-urlencoded")))
(url-request-data (tekuti-form-encode-data data))) (url-request-data (tekuti-form-encode-data data)))
(url-retrieve (format "%s/admin/new-post" tekuti-host) (url-retrieve (format "%s/admin/new-post" tekuti-host)
(lambda (status &rest args) (message "Finished: %s" status))))) (lambda (status &rest _) (message "Finished: %s" status)))))
(defvar tekuti-host "http://127.0.0.1:8080")
(provide 'tekuti) (provide 'tekuti)
;;; tekuti.el ends here ;;; tekuti.el ends here