* subr.el: Provide hashtable-print-readable.

This commit is contained in:
Chong Yidong 2009-08-09 02:57:45 +00:00
parent 1c292fc7de
commit 18d433a761
2 changed files with 11 additions and 0 deletions

View file

@ -1,5 +1,7 @@
2009-08-09 Chong Yidong <cyd@stupidchicken.com>
* subr.el: Provide hashtable-print-readable.
* progmodes/hideshow.el (hs-special-modes-alist): Don't use
hs-c-like-adjust-block-beginning.
(hs-hide-block-at-point): Stop hiding at the beginning of

View file

@ -3647,5 +3647,14 @@ is greater than \"1pre\" which is greater than \"1beta\" which is greater than
\"1alpha\"."
(version-list-= (version-to-list v1) (version-to-list v2)))
;;; Misc.
;; The following statement ought to be in print.c, but `provide' can't
;; be used there.
(when (hash-table-p (car (read-from-string
(prin1-to-string (make-hash-table)))))
(provide 'hashtable-print-readable))
;; arch-tag: f7e0e6e5-70aa-4897-ae72-7a3511ec40bc
;;; subr.el ends here