You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

29 lines
3.0 KiB
EmacsLisp

6 months ago
;; light mode only not yet sure how to do dark mode in the most sensible way
(defun addtoot ()
(interactive)
(setq dispname (read-string "Display name: "))
(setq avatar (read-string "Avatar URL (with https://): "))
(setq fediname (read-string "Username: "))
(setq instanceurl (read-string "Instance URL (without https://): "))
(setq profileurl (read-string "Profile URL (with https://): "))
(setq toottext (read-string "Text (HTML): "))
(setq csstext (replace-regexp-in-string "<a href" "<a style=\"color: #2b90d9; text-decoration: underline;\" href" toottext))
(setq theurl (read-string "URL of post (with https://): "))
(setq theday (read-string "Day of month: "))
(setq themonth (read-string "Month in words: "))
(setq theyear (read-string "Year: "))
(setq repost (y-or-n-p "Shared by someone else?"))
(if repost
(setq reposter (read-string "Username of reposter: ")))
(insert " <div class=\"item\" style=\"padding: 1rem; display: block; margin: 0; border-top: 1px solid #8494ab;\">\n")
(if repost
(insert (concat "<div class=\"item-title\" style=\"margin: 0 0 0.7rem 0; color: #90a1ba; font-size: 0.9rem; padding: 0; display: block;\">" reposter " shared a status by " fediname "</div>\n")))
(insert (concat "<div class=\"author\" style=\"display: flex; margin-bottom: 1rem; margin: 0; padding: 0;\">\n <a target=\"_top\" class=\"avatar\" href=\"" profileurl "\" style=\"width: 3rem; height: 3rem: border: none; border-radius: 10%; color: #2b90d9; margin: 0; padding: 0; display: block;\">\n <img class=\"avatar\" src=\"" avatar "\" style=\"width: 3rem; height: 3rem: border: none; border-radius: 10%; color: #2b90d9; margin: 0; padding: 0; overflow: clip-margin: content-box; overflow: clip;\">\n </a>\n <div class=\"author-info\" style=\"margin: 0 1rem; display: flex; flex-direction: column; justify-content: space-around; padding: 0; font-size: 0.9rem;\">\n <a target=\"_top\" class=\"author-displayname\" href=\"" profileurl "\" style=\"font-size: 1.2rem; color: #282c37; text-decoration: none; display: block; font-weight: bolder; margin: 0; padding: 0;\">" dispname "</a>\n <div class=\"author-fullname\" style=\"color: #90a1ba; font-size: 0.9rem; margin: 0; padding: 0; display: block;\">@" fediname "@" instanceurl "</div>\n </div>\n </div>\n <div class=\"item-content\" style=\"font-weight: normal; font-size: 1.1rem; margin: 0; padding: 0; display: block;\">\n <p style=\"margin: 1rem 0; line-height: 1.4rem; padding: 0;\">" csstext "</p>\n </div>\n <a class=\"date\" href=\"" theurl "\" style=\"margin: 1rem 0 0 0; text-decoration: none; display: block; color: #90a1ba; font-size: 0.9rem;\">" theday " " themonth ", " theyear "</a>\n </div>\n")))
(defun tootbuild ()
(interactive)
(insert "<div class=\"container\" style=\"font-size: 80%; background-color: #ffffff; font-family: 'Roboto', roboto, Arial, sans-serif; color: #282c37; overflow-x: hidden; word-break: break-word; margin: 10px; padding: 0; width: 300px; border: 1px solid #8494ab;\">\n")
(addtoot)
(insert "</div>"))