From a03a2b613f5d36de5617c50e76cced95fda188ac Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Wed, 13 Mar 2024 10:45:24 +0200
Subject: Add search-description configuration option

---
 etc/brep-module.conf                 |  7 +++++++
 etc/private/install/brep-module.conf |  7 +++++++
 mod/mod-packages.cxx                 | 10 ++++++++++
 mod/module.cli                       |  8 ++++++++
 mod/types-parsers.cxx                |  4 ++--
 5 files changed, 34 insertions(+), 2 deletions(-)

diff --git a/etc/brep-module.conf b/etc/brep-module.conf
index 654c260..d5a5e78 100644
--- a/etc/brep-module.conf
+++ b/etc/brep-module.conf
@@ -14,6 +14,13 @@
 # search-title Packages
 
 
+# Package search page description. If specified, it is displayed before the
+# search form on the first page only. The value is treated as an XHTML5
+# fragment.
+#
+# search-description ""
+
+
 # Web page logo. It is displayed in the page header aligned to the left edge.
 # The value is treated as an XHTML5 fragment.
 #
diff --git a/etc/private/install/brep-module.conf b/etc/private/install/brep-module.conf
index 01bba63..bfaa8f6 100644
--- a/etc/private/install/brep-module.conf
+++ b/etc/private/install/brep-module.conf
@@ -14,6 +14,13 @@
 # search-title Packages
 
 
+# Package search page description. If specified, it is displayed before the
+# search form on the first page only. The value is treated as an XHTML5
+# fragment.
+#
+# search-description ""
+
+
 # Web page logo. It is displayed in the page header aligned to the left edge.
 # The value is treated as an XHTML5 fragment.
 #
diff --git a/mod/mod-packages.cxx b/mod/mod-packages.cxx
index cee3806..914a841 100644
--- a/mod/mod-packages.cxx
+++ b/mod/mod-packages.cxx
@@ -136,6 +136,16 @@ handle (request& rq, response& rs)
     <<     DIV_HEADER (options_->logo (), options_->menu (), root, tenant)
     <<     DIV(ID="content");
 
+  // On the first page print the search page description, if specified.
+  //
+  if (page == 0)
+  {
+    const web::xhtml::fragment& desc (options_->search_description ());
+
+    if (!desc.empty ())
+      s << DIV(ID="search-description") << desc << ~DIV;
+  }
+
   // If the tenant is empty then we are in the global view and will display
   // packages from all the public tenants.
   //
diff --git a/mod/module.cli b/mod/module.cli
index 552a60b..ec86b7b 100644
--- a/mod/module.cli
+++ b/mod/module.cli
@@ -494,6 +494,14 @@ namespace brep
         "Package search page title. It is placed inside XHTML5 <title>
          element."
       }
+
+      web::xhtml::fragment search-description
+      {
+        "<xhtml>",
+        "Package search page description. If specified, it is displayed
+         before the search form on the first page only. The value is
+         treated as an XHTML5 fragment."
+      }
     };
 
     class package_details: package, search, package_db, page, handler
diff --git a/mod/types-parsers.cxx b/mod/types-parsers.cxx
index 60d70d7..f135608 100644
--- a/mod/types-parsers.cxx
+++ b/mod/types-parsers.cxx
@@ -204,9 +204,9 @@ namespace brep
       {
         x = fragment (v, o);
       }
-      catch (const xml::parsing&)
+      catch (const xml::parsing& e)
       {
-        throw invalid_value (o, v);
+        throw invalid_value (o, v, e.what ());
       }
     }
 
-- 
cgit v1.1