diff mbox series

[bug#36579] website: Add "permalinks" to package entries in package-list.

Message ID 20190710170437.3672-1-h.goebel@crazy-compilers.com
State Accepted
Headers show
Series [bug#36579] website: Add "permalinks" to package entries in package-list. | expand

Commit Message

Hartmut Goebel July 10, 2019, 5:04 p.m. UTC 
* website/apps/packages/templates/components.scm
  (detailed-package-preview): Add an id attribute and a link to itself
  to each package entry headline.
* website/static/packages/css/package-list.css: Add style rules
  to show the permalink symbol only when hovering over the
  headline.
---
 .../apps/packages/templates/components.scm    |  8 ++++++--
 website/static/packages/css/package-list.css  | 19 ++++++++++++++++++-
 2 files changed, 24 insertions(+), 3 deletions(-)

Comments

Hartmut Goebel Aug. 8, 2019, 12:21 p.m. UTC | #1 
Obsolete due to new website design
diff mbox series

Patch

diff --git a/website/apps/packages/templates/components.scm b/website/apps/packages/templates/components.scm
index 96e4296..7352402 100644
--- a/website/apps/packages/templates/components.scm
+++ b/website/apps/packages/templates/components.scm
@@ -41,13 +41,17 @@ 
   `(div
     (@ (class "package-preview"))
     (h3
-     (@ (class "package-name"))
+     (@ (class "package-name") (id ,(package-name package)))
      ,(package-name package) " " ,(package-version package) " "
      ,(if (package-issues? package) '(span (@ (class "red-tag")) "") " ")
      (span
       (@ (class "package-synopsis"))
       " — "
-      ,(package-synopsis-shtml package)))
+      ,(package-synopsis-shtml package))
+      (a
+       (@ (class "headerlink") (title "Permalink to this package")
+	  (href ,(string-append "#" (package-name package))))
+       " ¶"))
 
     (div
      (@ (class "package-description"))
diff --git a/website/static/packages/css/package-list.css b/website/static/packages/css/package-list.css
index 10f079b..2e9e352 100644
--- a/website/static/packages/css/package-list.css
+++ b/website/static/packages/css/package-list.css
@@ -40,4 +40,21 @@ 
     display: inline-block;
     height: 13px;
     width: 22px;
-}
\ No newline at end of file
+}
+
+a.headerlink {
+    visibility: hidden;
+}
+
+h1:hover > a.headerlink,
+h2:hover > a.headerlink,
+h3:hover > a.headerlink,
+h4:hover > a.headerlink,
+h5:hover > a.headerlink,
+h6:hover > a.headerlink,
+dt:hover > a.headerlink,
+caption:hover > a.headerlink,
+p.caption:hover > a.headerlink,
+div.code-block-caption:hover > a.headerlink {
+    visibility: visible;
+}