diff options
| -rw-r--r-- | lisp/json.el | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/lisp/json.el b/lisp/json.el index 460fdec7256..eae5eda783d 100644 --- a/lisp/json.el +++ b/lisp/json.el | |||
| @@ -49,8 +49,6 @@ | |||
| 49 | ;; 2008-02-21 - Installed in GNU Emacs. | 49 | ;; 2008-02-21 - Installed in GNU Emacs. |
| 50 | ;; 2011-10-17 - Patch `json-alist-p' and `json-plist-p' to avoid recursion -tzz | 50 | ;; 2011-10-17 - Patch `json-alist-p' and `json-plist-p' to avoid recursion -tzz |
| 51 | ;; 2012-10-25 - Added pretty-printed reformatting -Ryan Crum (ryan@ryancrum.org) | 51 | ;; 2012-10-25 - Added pretty-printed reformatting -Ryan Crum (ryan@ryancrum.org) |
| 52 | ;; 2019-02-02 - Pretty-printing now uses replace-region-contents and support for | ||
| 53 | ;; minimization -tsdh | ||
| 54 | 52 | ||
| 55 | ;;; Code: | 53 | ;;; Code: |
| 56 | 54 | ||
| @@ -757,13 +755,6 @@ With prefix argument MINIMIZE, minimize it instead." | |||
| 757 | (interactive "P") | 755 | (interactive "P") |
| 758 | (json-pretty-print (point-min) (point-max) minimize)) | 756 | (json-pretty-print (point-min) (point-max) minimize)) |
| 759 | 757 | ||
| 760 | (defvar json-pretty-print-max-secs 2.0 | ||
| 761 | "Maximum time for `json-pretty-print's comparison. | ||
| 762 | The function `json-pretty-print' uses `replace-region-contents' | ||
| 763 | (which see) passing the value of this variable as argument | ||
| 764 | MAX-SECS.") | ||
| 765 | (make-obsolete-variable 'json-pretty-print-max-secs nil "27.1") | ||
| 766 | |||
| 767 | (defun json-pretty-print (begin end &optional minimize) | 758 | (defun json-pretty-print (begin end &optional minimize) |
| 768 | "Pretty-print selected region. | 759 | "Pretty-print selected region. |
| 769 | With prefix argument MINIMIZE, minimize it instead." | 760 | With prefix argument MINIMIZE, minimize it instead." |