branch: externals/tomelr commit 7c004af90d70b0e86772496607ab21ed375fe8e2 Author: Kaushal Modi <kaushal.m...@gmail.com> Commit: Kaushal Modi <kaushal.m...@gmail.com>
style: Remove unnecessary tomelr-encode-* functions --- tomelr.el | 16 ++-------------- 1 file changed, 2 insertions(+), 14 deletions(-) diff --git a/tomelr.el b/tomelr.el index 20d9a3190e..54e0164b64 100644 --- a/tomelr.el +++ b/tomelr.el @@ -129,9 +129,7 @@ Optional TYPE arg gives more information about the input STRING. For example, if the string is the name of a TOML key, it will be set to `keyword'. -Return the same STRING passed as input. See -`tomelr-encode-string' instead if you need a function that -returns the TOML representation as a string." +Return the same STRING passed as input." ;; (message "[tomelr--print-string DBG] string = `%s'" string) (let ((special-chars '((?b . ?\b) ;U+0008 (?f . ?\f) ;U+000C @@ -176,10 +174,6 @@ returns the TOML representation as a string." (and end-q (insert end-q)) string)) -(defun tomelr-encode-string (string) - "Return a TOML representation of STRING." - (tomelr--with-output-to-string (tomelr--print-string string))) - (defun tomelr--print-stringlike (object &optional type) "Insert OBJECT encoded as a TOML string at point. @@ -324,8 +318,7 @@ Definition of a TOML Table Array (TTA): (format "[[%s]]" (string-join tomelr--print-table-hierarchy ".")))) (defun tomelr--print-array (array) - "Insert a TOML representation of ARRAY at point. -See `tomelr-encode-array' that returns the same as a string." + "Insert a TOML representation of ARRAY at point." ;; (message "[tomelr--print-array DBG] array = %S, TTA = %S" ;; array (tomelr--toml-table-array-p array)) (cond @@ -352,11 +345,6 @@ See `tomelr-encode-array' that returns the same as a string." (insert " ")) (insert "]")))) -(defun tomelr-encode-array (array) - "Return a TOML representation of ARRAY. -ARRAY can also be a list." - (tomelr--with-output-to-string (tomelr--print-array array))) - ;;;; Print wrapper (defun tomelr--print (object) "Insert a TOML representation of OBJECT at point.