From 54f72077f73548b6297484c53a298a8626b3c319 Mon Sep 17 00:00:00 2001 From: Ivan Polyakov Date: Sun, 15 May 2022 20:18:35 +0300 Subject: [PATCH] some meta tags --- src/pages/index.scm | 10 +++++++++- src/pages/webapps/scrollbar.scm | 12 +++++++++++- 2 files changed, 20 insertions(+), 2 deletions(-) diff --git a/src/pages/index.scm b/src/pages/index.scm index 52b4fcb..801dfb8 100644 --- a/src/pages/index.scm +++ b/src/pages/index.scm @@ -31,4 +31,12 @@ (load "./src/templates/default.scm") (display xhtml-1.0-doctype) (display (serialize-sxml - (default-tpl title content page-name page-desc))) + (default-tpl + title + content + page-name + page-desc + '() + '() + '(((name "description") (content "Vilor's personal website")) + ((name "keywords") (content "vilor")))))) diff --git a/src/pages/webapps/scrollbar.scm b/src/pages/webapps/scrollbar.scm index cc38e0d..3edad25 100644 --- a/src/pages/webapps/scrollbar.scm +++ b/src/pages/webapps/scrollbar.scm @@ -171,4 +171,14 @@ (load "./src/templates/default.scm") (display xhtml-1.0-doctype) (display (serialize-sxml - (default-tpl title content page-name page-desc page-styles page-scripts))) + (default-tpl + title + content + page-name + page-desc + page-styles + page-scripts + `(((name "description") + (content "Demonstration of possible customization of the scrollbar.")) + ((name "keywords") + (content "CSS, SCSS, scrollbar, styling, constructor"))))))