66 lines
2.2 KiB
EmacsLisp
66 lines
2.2 KiB
EmacsLisp
|
;;; json-mode-autoloads.el --- automatically extracted autoloads
|
|||
|
|
;;
|
|||
|
|
;;; Code:
|
|||
|
|
|
|||
|
|
(add-to-list 'load-path (directory-file-name
|
|||
|
|
(or (file-name-directory #$) (car load-path))))
|
|||
|
|
|
|||
|
|
|
|||
|
|
;;;### (autoloads nil "json-mode" "json-mode.el" (0 0 0 0))
|
|||
|
|
;;; Generated autoloads from json-mode.el
|
|||
|
|
|
|||
|
|
(defconst json-mode-standard-file-ext '(".json" ".jsonld") "\
|
|||
|
|
List of JSON file extensions.")
|
|||
|
|
|
|||
|
|
(defsubst json-mode--update-auto-mode (filenames) "\
|
|||
|
|
Update the `json-mode' entry of `auto-mode-alist'.
|
|||
|
|
|
|||
|
|
FILENAMES should be a list of file as string.
|
|||
|
|
Return the new `auto-mode-alist' entry" (let* ((new-regexp (rx-to-string `(seq (eval (cons 'or (append json-mode-standard-file-ext ',filenames))) eot))) (new-entry (cons new-regexp 'json-mode)) (old-entry (when (boundp 'json-mode--auto-mode-entry) json-mode--auto-mode-entry))) (setq auto-mode-alist (delete old-entry auto-mode-alist)) (add-to-list 'auto-mode-alist new-entry) new-entry))
|
|||
|
|
|
|||
|
|
(defvar json-mode-auto-mode-list '(".babelrc" ".bowerrc" "composer.lock") "\
|
|||
|
|
List of filenames for the JSON entry of `auto-mode-alist'.
|
|||
|
|
|
|||
|
|
Note however that custom `json-mode' entries in `auto-mode-alist'
|
|||
|
|
won’t be affected.")
|
|||
|
|
|
|||
|
|
(custom-autoload 'json-mode-auto-mode-list "json-mode" nil)
|
|||
|
|
|
|||
|
|
(defvar json-mode--auto-mode-entry (json-mode--update-auto-mode json-mode-auto-mode-list) "\
|
|||
|
|
Regexp generated from the `json-mode-auto-mode-list'.")
|
|||
|
|
|
|||
|
|
(autoload 'json-mode "json-mode" "\
|
|||
|
|
Major mode for editing JSON files
|
|||
|
|
|
|||
|
|
\(fn)" t nil)
|
|||
|
|
|
|||
|
|
(autoload 'jsonc-mode "json-mode" "\
|
|||
|
|
Major mode for editing JSON files with comments
|
|||
|
|
|
|||
|
|
\(fn)" t nil)
|
|||
|
|
|
|||
|
|
(add-to-list 'magic-fallback-mode-alist '("^[{[]$" . json-mode))
|
|||
|
|
|
|||
|
|
(autoload 'json-mode-show-path "json-mode" "\
|
|||
|
|
Print the path to the node at point to the minibuffer." t nil)
|
|||
|
|
|
|||
|
|
(autoload 'json-mode-kill-path "json-mode" "\
|
|||
|
|
Save JSON path to object at point to kill ring." t nil)
|
|||
|
|
|
|||
|
|
(autoload 'json-mode-beautify "json-mode" "\
|
|||
|
|
Beautify / pretty-print the active region (or the entire buffer if no active region).
|
|||
|
|
|
|||
|
|
\(fn BEGIN END)" t nil)
|
|||
|
|
|
|||
|
|
(if (fboundp 'register-definition-prefixes) (register-definition-prefixes "json-mode" '("json")))
|
|||
|
|
|
|||
|
|
;;;***
|
|||
|
|
|
|||
|
|
;; Local Variables:
|
|||
|
|
;; version-control: never
|
|||
|
|
;; no-byte-compile: t
|
|||
|
|
;; no-update-autoloads: t
|
|||
|
|
;; coding: utf-8
|
|||
|
|
;; End:
|
|||
|
|
;;; json-mode-autoloads.el ends here
|