links upd

src/components/footer.scm

@@ -18,7 +18,7 @@
 (define footer-links
   '(("http://validator.w3.org/check?uri=referer" "XHTML 1.0")
     ("https://call-cc.org/" "Made with Chicken Scheme")
-    ("http://31.184.254.176:8078/vilor/website/" "Source code")
+    ("http://git.vilor.one:8079/vilor/website/" "Source code")
     ("http://www.anybrowser.org/campaign/" "Any Browser")))
 
 (define footer

src/components/header.scm

@@ -18,7 +18,7 @@
 (define header-links
   '(("/index.xhtml" "Home")
     ("/webapps/index.xhtml" "Web Apps")
-    ("http://31.184.254.176:8078/" "Git")
+    ("http://git.vilor.one:8079/" "Git")
     ("/contacts.xhtml" "Contacts")))
 
 (define header