skeeto / devdocs-lookup Goto Github PK

Debugger entered--Lisp error: (json-readtable-error 60)
  signal(json-readtable-error (60))
    debugger-may-continue = t
    inhibit-redisplay = nil
    inhibit-debugger = t
    inhibit-changing-match-data = nil
  json-read()
    [no locals]
  (puthash v (json-read) v)
    [no locals]
  (let* ((v subject) (v devdocs-index)) (puthash v (json-read) v))
    subject = "python"
    callback = nil
    index = nil
    url = "https://docs.devdocs.io/python/index.json"
    v = "python"
    v = #s(hash-table size 65 test equal rehash-size 1.5 rehash-threshold 0.8125 data ( ...))
  (save-current-buffer (set-buffer (url-retrieve-synchronously url nil t)) (goto-char url-http-end-of-headers) (let* ((v subject) (v devdocs-index)) (puthash v (json-read) v)))
    [no locals]
  (cond ((and index callback) (funcall callback index)) ((and index (not callback)) index) ((and (not index) (not callback)) (save-current-buffer (set-buffer (url-retrieve-synchronously url nil t)) (goto-char url-http-end-of-headers) (let* ((v subject) (v devdocs-index)) (puthash v (json-read) v)))) ((and (not index) callback) (url-retrieve url (function (lambda (_) (goto-char url-http-end-of-headers) (let* ((v subject) (v devdocs-index)) (puthash v (json-read) v)) (funcall callback (gethash subject devdocs-index)))))))
    [no locals]
  (let ((index (gethash subject devdocs-index)) (url (format "%s/%s/index.json" devdocs-base-index-url subject))) (cond ((and index callback) (funcall callback index)) ((and index (not callback)) index) ((and (not index) (not callback)) (save-current-buffer (set-buffer (url-retrieve-synchronously url nil t)) (goto-char url-http-end-of-headers) (let* ((v subject) (v devdocs-index)) (puthash v (json-read) v)))) ((and (not index) callback) (url-retrieve url (function (lambda (_) (goto-char url-http-end-of-headers) (let* (... ...) (puthash v ... v)) (funcall callback (gethash subject devdocs-index))))))))
    subject = "python"
    callback = nil
    index = nil
    url = "https://docs.devdocs.io/python/index.json"
  devdocs-index("python")
    subject = "python"
    callback = nil
  (assoc (quote entries) (devdocs-index subject))
    [no locals]
  (cdr (assoc (quote entries) (devdocs-index subject)))
    [no locals]
  (let* ((--cl-vec-- (cdr (assoc (quote entries) (devdocs-index subject)))) (--cl-idx-- -1) (entry nil) (--cl-var-- nil)) (while (< (setq --cl-idx-- (1+ --cl-idx--)) (length --cl-vec--)) (setq entry (aref --cl-vec-- --cl-idx--)) (setq --cl-var-- (cons (cons (cdr (assoc (quote name) entry)) (cdr (assoc (quote path) entry))) --cl-var--))) (nreverse --cl-var--))
    [no locals]
  devdocs-entries("python")
    subject = "python"
  (mapcar (function car) (devdocs-entries subject))
    [no locals]
  (let* ((names (mapcar (function car) (devdocs-entries subject))) (hist (intern (format "devdocs--hist-%s" subject))) (symbol (symbol-at-point)) (best-match (and symbol (devdocs--best-match (symbol-name symbol) names))) (prompt (if best-match (format "Entry (%s) [%s]: " best-match subject) (format "Entry [%s]: " subject)))) (completing-read prompt names nil :require-match nil hist best-match))
    [no locals]
  devdocs-read-entry("python")
    subject = "python"
  (let* ((case-fold-search t) (major-mode-string (replace-regexp-in-string "-mode$" "" (symbol-name major-mode))) (subject-dwim (car (cdr (cl-assoc major-mode-string devdocs-subjects :test (function string-match-p))))) (subject (if current-prefix-arg (devdocs-read-subject) (or devdocs--default-subject subject-dwim (devdocs-read-subject)))) (entry (devdocs-read-entry subject))) (if subject (progn (setq devdocs--default-subject subject))) (list subject entry))
    case-fold-search = t
    major-mode-string = "python"
    subject-dwim = "python"
    subject = "python"
  call-interactively(devdocs-lookup nil nil)
    [no locals]
  command-execute(devdocs-lookup)
    [no locals]

(use-package devdocs-lookup
  :bind (("C-c d" . devdocs-lookup))
  :config (setf devdocs-base-index-url "https://devdocs.io/docs/"
                (cadr (assoc "Python" devdocs-subjects)) "python~3.5"))