summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThanos Apollo <[email protected]>2024-01-09 20:55:31 +0200
committerThanos Apollo <[email protected]>2024-01-09 20:55:57 +0200
commit5a173df634c385fb87f6a4e873949ad8efb13c82 (patch)
treefbabdb594e888851e3308ce9240bacb5c39f8a9a
parent72e65b345d9aeb7ee5590acb2e97d5c60297dc11 (diff)
Remove yeetube---fix-title
tabulated-lists solves previous issues
-rw-r--r--yeetube.el15
1 files changed, 2 insertions, 13 deletions
diff --git a/yeetube.el b/yeetube.el
index 2314c59..d0bac18 100644
--- a/yeetube.el
+++ b/yeetube.el
@@ -248,16 +248,6 @@ then for item."
("\\\\" . ""))
"Unicode character replacements.")
-;; Usually titles from youtube get messed up,
-;; This should fix some of the common issues.
-(defun yeetube---fix-title (title)
- "Adjust TITLE."
- (mapc (lambda (replacement)
- (setf title (replace-regexp-in-string (car replacement) (cdr replacement) title)))
- yeetube--title-replacements)
- (if yeetube-buffer-display-emojis
- title
- (yeetube-buffer-strip-emojis title)))
(defun yeetube-get-content ()
"Get content from youtube."
@@ -269,9 +259,8 @@ then for item."
(- (search-forward ",") 2))))
(unless (member videoid (car yeetube-content))
(yeetube-get-item "title") ;; Video Title
- (let ((title (yeetube---fix-title
- (buffer-substring (+ (point) 3)
- (- (search-forward ",\"") 5)))))
+ (let ((title (buffer-substring (+ (point) 3)
+ (- (search-forward ",\"") 5))))
(unless (member title (car yeetube-content))
(yeetube-get-item "viewcounttext") ;; View Count
(let ((view-count (buffer-substring (+ (point) 3)