From 3ab61c4bf779e74c6d7b4c3e2215487879596fd7 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Mon, 20 Jul 2015 21:45:51 +0200 Subject: website: main: Update screenshots. * website/www.scm (main-page): Update list of screenshots. * website/static/base/img/screenshots/thumbs/enlightenment-inkscape.png, website/static/base/img/screenshots/thumbs/guix-edit+evince.png, website/static/base/img/screenshots/thumbs/guix-system-vm.png: New files. --- website/www.scm | 27 ++++++++++++++------------- 1 file changed, 14 insertions(+), 13 deletions(-) (limited to 'website/www.scm') diff --git a/website/www.scm b/website/www.scm index 94bf981..79c5e5a 100644 --- a/website/www.scm +++ b/website/www.scm @@ -235,20 +235,21 @@ packaging API. ") (class "h-separator") (alt ""))) (div (@ (id "screens-box")) - ,@(map (lambda (file alt) - (screenshot file #:alt alt)) - '("guixsd-grub.png" - "guixsd-slim.png" - "guix-screenie.png" - ;; "guixsd-xfce-emacs.png" - "guixsd-xfce-icecat-emacs.png" - "guixsd-xfce-mines.png") - '("GRUB menu" - "Graphical log-in screen" - "Emacs, IceCat, and Evince" - ;; "Xfce and Emacs" + ,@(map (match-lambda* + (((version file) alt) + (screenshot file + #:alt alt + #:directory version))) + '(("0.8.2" "guixsd-slim.png") + ("0.8.2" "guixsd-xfce-icecat-emacs.png") + ("0.8.3" "guix-system-vm.png") + ("0.8.3" "guix-edit+evince.png") + ("0.8.3" "enlightenment-inkscape.png")) + '("Graphical log-in screen" "Xfce, IceCat, and Emacs" - "Xfce and GNOME Mines"))) + "VM started with 'guix system vm'" + "Evince, Emacs, and 'guix edit'" + "Enlightenment, Inkscape, and Serbian text"))) (p (a (@ (href ,(base-url "contribute") ) (class "hlink-yellow-boxed")) "Help us package more software →"))) -- cgit v1.2.3