guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

01/01: website: Replace front-page video with a demo.


From: Ludovic Courtès
Subject: 01/01: website: Replace front-page video with a demo.
Date: Sun, 31 Jul 2016 10:10:17 +0000 (UTC)

civodul pushed a commit to branch master
in repository guix-artwork.

commit 8a55b14834606b35bfe31278a98ba5e1cc49331e
Author: Ludovic Courtès <address@hidden>
Date:   Sun Jul 31 02:03:19 2016 +0200

    website: Replace front-page video with a demo.
    
    * website/static/base/img/guix-demo.png: New file.
    * website/www.scm (%video-url): Change.
    (main-page): Use guix-demo.png as the video poster.
---
 website/static/base/img/guix-demo.png |  Bin 0 -> 271576 bytes
 website/www.scm                       |    4 ++--
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/website/static/base/img/guix-demo.png 
b/website/static/base/img/guix-demo.png
new file mode 100644
index 0000000..744a54c
Binary files /dev/null and b/website/static/base/img/guix-demo.png differ
diff --git a/website/www.scm b/website/www.scm
index c72c6e0..916713d 100644
--- a/website/www.scm
+++ b/website/www.scm
@@ -95,7 +95,7 @@
 (define %video-url
   ;; Note: No "http:" so that people viewing the parent page via HTTPS get
   ;; the video via HTTPS as well (otherwise some browsers complain.)
-  
"//audio-video.gnu.org/video/misc/2015-01__GNU_Guix__The_Emacs_of_Distros.webm")
+  "//audio-video.gnu.org/video/misc/2016-07__GNU_Guix_Demo_2.webm")
 
 (define (sxml->string* tree)
   "Flatten tree by dismissing tags and attributes, and return the resulting
@@ -210,7 +210,7 @@ domain-specific languages (EDSLs) to "
                    (div (@ (class "info-box text-center"))
                         (video (@ (src ,%video-url)
                                   (poster
-                                   ,(image-url "the-emacs-of-distros.png"))
+                                   ,(image-url "guix-demo.png"))
                                   (controls "controls")
                                   (class "video-preview"))
                                (p "Video: "



reply via email to

[Prev in Thread] Current Thread [Next in Thread]