[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa-admin 54886a6 199/439: Better generated HTML pages
From: |
Philip Kaludercic |
Subject: |
[nongnu] elpa-admin 54886a6 199/439: Better generated HTML pages |
Date: |
Sun, 17 Oct 2021 15:48:01 -0400 (EDT) |
branch: elpa-admin
commit 54886a62460d0ce92e6a47826ef28dc96be4bb29
Author: Nicolas Petton <nicolas@petton.fr>
Commit: Nicolas Petton <nicolas@petton.fr>
Better generated HTML pages
* admin/archive-contents.el: Better HTML generation.
* html/index.html: Improvements of the page.
* html/javascript/jquery.filtertable.min.js:
* html/layout.css: New css rules
* html/favicon.png:
* html/images/elpa-small.png:
* html/images/elpa.png:
* html/javascript/jquery.min.js:
* html/javascript/package-search.js: New files.
---
admin/archive-contents.el | 49 +++++++++++++++++++++++++++++++++++++----------
1 file changed, 39 insertions(+), 10 deletions(-)
diff --git a/admin/archive-contents.el b/admin/archive-contents.el
index 74e473e..92b27c9 100755
--- a/admin/archive-contents.el
+++ b/admin/archive-contents.el
@@ -344,14 +344,30 @@ Rename DIR/ to PKG-VERS/, and return the descriptor."
;;; Make the HTML pages for online browsing.
(defun archive--html-header (title)
- (format "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 3.2 Final//EN\">
+ (format "<!DOCTYPE HTML PUBLIC>
<html>
-<head>
- <title>%s</title>
- <meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\">
-</head>
-<body>
-<h1 align=\"center\">%s</h1>\n"
+ <head>
+ <title>%s</title>
+ <meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">
+ <link rel=\"shortcut icon\" type=\"image/png\" href=\"../favicon.png\">
+ <link rel=\"stylesheet\"
href=\"//code.cdn.mozilla.net/fonts/fira.css\">
+ <link rel=\"stylesheet\" type=\"text/css\" href=\"../layout.css\">
+ <script src=\"../javascript/jquery.min.js\"
type=\"text/javascript\"></script>
+ <script src=\"../javascript/jquery.filtertable.min.js\"
type=\"text/javascript\"></script>
+ <script src=\"../javascript/package-search.js\"
type=\"text/javascript\"></script>
+ <meta name=\"viewport\"
content=\"initial-scale=1.0,maximum-scale=1.0,width=device-width\" />
+ </head>
+ <body>
+
+ <div class=\"wrapper\">
+
+ <div class=\"header small\">
+ <div class=\"container\">
+ <h1>Package list</h1>
+ </div>
+ </div>
+
+ <div class=\"container\">\n"
title title))
(defun archive--html-bytes-format (bytes) ;Aka memory-usage-format.
@@ -485,7 +501,7 @@ Rename DIR/ to PKG-VERS/, and return the descriptor."
(insert "<h2>Full description</h2><pre>\n" (archive--quote rm)
"\n</pre>\n")))
(unless (< (length files) (if (zerop (length latest)) 1 2))
- (insert (format "<h2>Old versions</h2><table cellpadding=\"3\"
border=\"1\">\n"))
+ (insert (format "<h2>Old versions</h2><table>\n"))
(dolist (file files)
(unless (equal (pop file) latest)
(let ((attrs (file-attributes file)))
@@ -505,14 +521,27 @@ Rename DIR/ to PKG-VERS/, and return the descriptor."
(defun archive--html-make-index (pkgs)
(with-temp-buffer
(insert (archive--html-header "GNU ELPA Packages"))
- (insert "<table cellpadding=\"3\" border=\"1\">\n")
+ (insert "<table>\n")
(insert "<tr><th>Package</th><th>Version</th><th>Description</th></tr>\n")
(dolist (pkg pkgs)
(insert (format "<tr><td><a
href=\"%s.html\">%s</a></td><td>%s</td><td>%s</td></tr>\n"
(car pkg) (car pkg)
(package-version-join (aref (cdr pkg) 0))
(aref (cdr pkg) 2))))
- (insert "</table></body>\n")
+ (insert " </table>
+ </div>
+ <div class=\"push\"></div>
+ </div>
+
+ <div class=\"footer\">
+ <div class=\"container\">
+ <p>
+ Copyright 2015 Free Software Foundation, Inc.
+ </p>
+ </div>
+ </div>
+
+</body>\n")
(write-region (point-min) (point-max) "index.html")))
(defun batch-html-make-index ()
- [nongnu] elpa-admin daf3553 099/439: Sync from ack/master, (continued)
- [nongnu] elpa-admin daf3553 099/439: Sync from ack/master, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin b0862f3 103/439: * README: Update with corrected information., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 0ed260a 107/439: add :keywords to extra package properties, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 9f93862 109/439: seems to be generally usable, added a README, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 8787a52 110/439: more documentation and examples, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin e55d6b1 102/439: Sync with yasnippet/master, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 52e4af0 105/439: Add new element to the archive-contents vector, and put, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 524fc02 114/439: updating notes and README text, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 281d4aa 194/439: * GNUmakefile: Update due to a dependency change, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 4a2ebd4 186/439: Merge branch 'master' of git+ssh://git.sv.gnu.org/srv/git/emacs/elpa, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 54886a6 199/439: Better generated HTML pages,
Philip Kaludercic <=
- [nongnu] elpa-admin 83d4032 202/439: * README: Typos, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 7e4545d 200/439: * admin/archive-contents.el (archive--html-header): Use `title' for the H1., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin a30b538 216/439: Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs/elpa, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin a3dcbb3 225/439: Merge branch 'master' into new-website, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin b9f2b90 208/439: * admin/archive-contents.el (archive--sync-emacs-repo): Fix thinko., Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 839fe96 209/439: * GNUmakefile (check_copyrights): Skip symlinks, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin c8b582a 220/439: Merge commit '1054ea1bc5b07a1438a18c1b33f4266b28ff9d77', Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 7558d12 206/439: Make externals directory removal safer, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 5b91341 226/439: Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs/elpa, Philip Kaludercic, 2021/10/17
- [nongnu] elpa-admin 3fc8681 221/439: Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs/elpa, Philip Kaludercic, 2021/10/17