Browse Source

footer upd

dev
Ivan Polyakov 2 years ago
parent
commit
7d140f99cd
  1. 7
      frontend/src/components/footer.scm

7
frontend/src/components/footer.scm

@ -16,16 +16,15 @@
;; along with this program. If not, see <https://www.gnu.org/licenses/>. ;; along with this program. If not, see <https://www.gnu.org/licenses/>.
(define footer-links (define footer-links
'(("http://validator.w3.org/check?uri=referer" "XHTML 1.0") '(("http://www.gnu.org/software/guile" "Made with GNU Guile")
("https://call-cc.org/" "Made with Chicken Scheme") ("http://git.vilor.one/vilor/website/" "Source code")
("http://git.vilor.one:8079/vilor/website/" "Source code")
("http://www.anybrowser.org/campaign/" "Any Browser"))) ("http://www.anybrowser.org/campaign/" "Any Browser")))
(define footer (define footer
`(footer (@ (class "footer")) `(footer (@ (class "footer"))
(div (@ (class "footer__authors")) (div (@ (class "footer__authors"))
(div "Content: " (div "Content: "
(a (@ (href "/contacts.xhtml")) "Ivan Polyakov")) (a (@ (href "/contacts.html")) "Ivan Polyakov"))
(div "Design: " (div "Design: "
(a (@ (href "https://t.me/olnaolna")) "Olga Revenkova"))) (a (@ (href "https://t.me/olnaolna")) "Olga Revenkova")))

Loading…
Cancel
Save