aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--sx-encoding.el12
1 files changed, 12 insertions, 0 deletions
diff --git a/sx-encoding.el b/sx-encoding.el
index 0b72365..bea9071 100644
--- a/sx-encoding.el
+++ b/sx-encoding.el
@@ -74,6 +74,18 @@
(substring ss 1))))))))
(replace-regexp-in-string "&[^; ]*;" get-function string)))
+(defun sx-encoding-normalize-line-endings (string)
+ "Normalize the line endings for STRING"
+ (delete ? string))
+
+(defun sx-encoding-clean-content (string)
+ "Cleans STRING for display.
+Applies `sx-encoding-normalize-line-endings' and
+`sx-encoding-decode-entities'."
+ (sx-encoding-decode-entities
+ (sx-encoding-normalize-line-endings
+ string)))
+
(defun sx-encoding-gzipped-p (data)
"Checks for magic bytes in DATA.