From 074c525d7b125922df6d47246df8645916dedbc9 Mon Sep 17 00:00:00 2001 From: Johnson Denen Date: Sun, 23 Apr 2017 22:26:36 -0400 Subject: Make tweaks per package-lint feedback --- lisp/mastodon-http.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'lisp/mastodon-http.el') diff --git a/lisp/mastodon-http.el b/lisp/mastodon-http.el index b41fccc..4c5d3dc 100644 --- a/lisp/mastodon-http.el +++ b/lisp/mastodon-http.el @@ -2,6 +2,8 @@ ;; Copyright (C) 2017 Johnson Denen ;; Author: Johnson Denen +;; Version: 0.5.1 +;; Package-Requires: ((emacs "24.4")) ;; Homepage: https://github.com/jdenen/mastodon.el ;; This file is not part of GNU Emacs. @@ -50,7 +52,7 @@ (string-match pattern resp) (match-string 0 resp)))) -(defun mastdon-http--status () +(defun mastodon-http--status () "Return HTTP Response Status Code from `mastodon-http--response'." (let* ((status-line (mastodon-http--response-body "^HTTP/1.*$"))) (progn @@ -59,7 +61,7 @@ (defun mastodon-http--triage (response success) (let ((status (with-current-buffer response - (mastdon-http--status)))) + (mastodon-http--status)))) (if (string-prefix-p "2" status) (funcall success) (switch-to-buffer response)))) -- cgit v1.2.3