Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil) /=(200 nil) (if (/= 200 url-http-response-status) (error "Internal Server Error")) achive-parse-response() (achive-format-content codes (achive-parse-response)) (let ((formated-resp (achive-format-content codes (achive-parse-response)))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring (mapcar #'achive-propertize-face formated-resp) formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp))) (closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh (not timer-alive)) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes (achive-parse-response)))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring (mapcar #'achive-propertize-face formated-resp) formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp))))() funcall((closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh (not timer-alive)) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes (achive-parse-response)))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring (mapcar #'achive-propertize-face formated-resp) formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp))))) (closure ((callback closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh ...) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes ...))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring ... formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp)))) (url . "https://hq.sinajs.cn/list=sh000001,sz399001,sz3990...") t) (_status) (let ((inhibit-message t)) (message "achive: %s at %s" "The request is successful." (format-time-string "%T"))) (funcall callback))((:error (error connection-failed "failed with code 61\n" :host "127.0.0.1" :service 8889))) apply((closure ((callback closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh ...) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes ...))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring ... formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp)))) (url . "https://hq.sinajs.cn/list=sh000001,sz399001,sz3990...") t) (_status) (let ((inhibit-message t)) (message "achive: %s at %s" "The request is successful." (format-time-string "%T"))) (funcall callback)) (:error (error connection-failed "failed with code 61\n" :host "127.0.0.1" :service 8889))) url-http-activate-callback() url-http-async-sentinel(#<process hq.sinajs.cn<2>> "failed with code 61\n")
报错信息如上。
Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil) /=(200 nil) (if (/= 200 url-http-response-status) (error "Internal Server Error")) achive-parse-response() (achive-format-content codes (achive-parse-response)) (let ((formated-resp (achive-format-content codes (achive-parse-response)))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring (mapcar #'achive-propertize-face formated-resp) formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp))) (closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh (not timer-alive)) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes (achive-parse-response)))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring (mapcar #'achive-propertize-face formated-resp) formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp))))() funcall((closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh (not timer-alive)) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes (achive-parse-response)))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring (mapcar #'achive-propertize-face formated-resp) formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp))))) (closure ((callback closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh ...) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes ...))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring ... formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp)))) (url . "https://hq.sinajs.cn/list=sh000001,sz399001,sz3990...") t) (_status) (let ((inhibit-message t)) (message "achive: %s at %s" "The request is successful." (format-time-string "%T"))) (funcall callback))((:error (error connection-failed "failed with code 61\n" :host "127.0.0.1" :service 8889))) apply((closure ((callback closure ((callback closure ((timer-alive) t) (_resp) (if (and achive-auto-refresh ...) (achive-handle-auto-refresh))) (codes "sh000001" "sz399001" "sz399006" "sh600036" "sh601012" "sz000625" "sz002050" "sz002013" "sh600176") (buffer-name . "*A Chive*") t) nil (let ((formated-resp (achive-format-content codes ...))) (save-current-buffer (set-buffer buffer-name) (setq tabulated-list-entries (if achive-colouring ... formated-resp)) (tabulated-list-print t)) (if (functionp callback) (funcall callback formated-resp)))) (url . "https://hq.sinajs.cn/list=sh000001,sz399001,sz3990...") t) (_status) (let ((inhibit-message t)) (message "achive: %s at %s" "The request is successful." (format-time-string "%T"))) (funcall callback)) (:error (error connection-failed "failed with code 61\n" :host "127.0.0.1" :service 8889))) url-http-activate-callback() url-http-async-sentinel(#<process hq.sinajs.cn<2>> "failed with code 61\n")报错信息如上。