From 45fc6f203e2fef528cb2bb0d7c0140e160c974e2 Mon Sep 17 00:00:00 2001 From: Oleh Krehel Date: Sat, 20 Jul 2019 19:22:51 +0200 Subject: [PATCH] * lisp/files.el (file-size-function): Add :version tag --- lisp/files.el | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/lisp/files.el b/lisp/files.el index 89e9a693d11..70865ebcdf1 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -6700,11 +6700,12 @@ This variable is obsolete; Emacs no longer uses it." (defcustom file-size-function #'file-size-human-readable "Function that transforms the number of bytes into a human-readable string." - :type '(choice - (const :tag "default" file-size-human-readable) - (const :tag "iec" - (lambda (size) (file-size-human-readable size 'iec " "))) - (function :tag "Custom function"))) + :type `(radio + (function-item :tag "Default" file-size-human-readable) + (function-item :tag "IEC" + ,(lambda (size) (file-size-human-readable size 'iec " "))) + (function :tag "Custom function")) + :version "27.1") (defun get-free-disk-space (dir) "String describing the amount of free space on DIR's file system. -- 2.39.2