From mboxrd@z Thu Jan 1 00:00:00 1970 From: ludo@gnu.org (Ludovic =?utf-8?Q?Court=C3=A8s?=) Subject: Posts in languages other than English on help-guix? Date: Fri, 02 Mar 2018 17:02:40 +0100 Message-ID: <87a7vqea8v.fsf@gnu.org> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-guix-bounces+gcggh-help-guix=m.gmane.org@gnu.org Sender: "Help-Guix" To: Guix-devel , help-guix List-Id: guix-devel.gnu.org --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Hello Guix! What about allowing posts on help-guix in one of the languages that regular contributors know, in addition to English? The alternative would be to create separate language-specific lists, but some (rightfully) think there=E2=80=99s a risk of a disconnect with actual developers. Of course it=E2=80=99s hard to tell what a multilingual mailing list will be like, but I think it=E2=80=99s worth experimenting (and I don=E2=80=99t exp= ect a significant change overnight). If we are to reach out to more people, allowing them to use the language they know best is the minimum we can do IMO. WDYT? To experiment with this on help-guix, I propose the patch below for the web site. If you=E2=80=99re a committer, please provide a translation for = the language(s) you know! Ludo=E2=80=99. --=-=-= Content-Type: text/x-patch; charset=utf-8 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable diff --git a/website/apps/base/data.scm b/website/apps/base/data.scm index 0abcc7a..4ccca9a 100644 --- a/website/apps/base/data.scm +++ b/website/apps/base/data.scm @@ -13,7 +13,6 @@ ;;; Data. ;;; =20 - (define contact-media (list ;; The first three will be featured in the home page. @@ -30,12 +29,18 @@ (contact #:name "Help Mailing List" #:description - '(p - "Subscribe to the Help mailing list to get support from the - GuixSD and GNU Guix community via email. " - (a (@ (href "https://lists.gnu.org/archive/html/guix-devel/2015-12/m= sg00584.html")) - "Until December 2015") - ", the Guix-devel mailing list filled that role.") + `(("en" + "Subscribe to the Help mailing list to get support from the GuixSD +and GNU=C2=A0Guix community via email. You can post messages in English t= hough we +also accept other languages.") + ("eo" + "Subskribu al la retmesa=C4=9Dolisto \"Help\" por demandi helpon pri +GuixSD kaj GNU=C2=A0Guix al la grupo. Vi povas skribi esperantlingve.") + ("fr" + "Abonnez-vous =C3=A0 la liste de diffusion =C2=AB=C2=A0Help=C2=A0= =C2=BB pour obtenir l'aide +de la communaut=C3=A9 sur GuixSD et GNU=C2=A0Guix par courrier =C3=A9lectr= onique. Vous +pouvez envoyer des messages en Fran=C3=A7ais.")) + #:url "https://lists.gnu.org/mailman/listinfo/help-guix" #:log "https://lists.gnu.org/archive/html/help-guix") =20 diff --git a/website/apps/base/templates/components.scm b/website/apps/base= /templates/components.scm index b329c71..04d3a08 100644 --- a/website/apps/base/templates/components.scm +++ b/website/apps/base/templates/components.scm @@ -13,6 +13,7 @@ #:use-module (apps base types) #:use-module (apps base utils) #:use-module (srfi srfi-1) + #:use-module (ice-9 match) #:export (breadcrumbs button-big button-little @@ -121,6 +122,11 @@ "=E2=80=A6"))) =20 =20 +(define (language-tag lang) + `(span (@ (class "button-little button-little-active") + (style "float: left; text-align: center; width: 20px; vertical= -align: middle")) + ,lang)) + (define (contact->shtml contact) "Return an SHTML representation of the given contact object. =20 @@ -133,7 +139,18 @@ "" `(small " (" (a (@ (href ,(contact-log contact))) "archive") ") ")) - ,(contact-description contact))) + + ;; The description can be a list of language/blurb pairs. + ,(match (contact-description contact) + ((((? string? languages) blurbs) ...) + `(p ,@(map (lambda (language blurb) + `(div (@ (style "margin: 0 10px 10px 0")) + ,(language-tag language) + (div ,blurb))) + languages + blurbs))) + (blurb + blurb)))) =20 =20 (define* (horizontal-separator #:key (light #false)) diff --git a/website/apps/base/templates/contact.scm b/website/apps/base/te= mplates/contact.scm index 16e4b4e..c246d4b 100644 --- a/website/apps/base/templates/contact.scm +++ b/website/apps/base/templates/contact.scm @@ -23,7 +23,8 @@ "Community" "Mailing lists" "IRC channels" "Bug reports" "Help") #:active-menu-item "About" #:css (list - (guix-url "static/base/css/page.css")) + (guix-url "static/base/css/page.css") + (guix-url "static/base/css/buttons.css")) #:crumbs (list (crumb "Contact" "./")) #:content `(main diff --git a/website/static/base/css/buttons.css b/website/static/base/css/= buttons.css index 9e45190..feabcea 100644 --- a/website/static/base/css/buttons.css +++ b/website/static/base/css/buttons.css @@ -37,6 +37,7 @@ } =20 =20 +.button-little, .button-little:link, .button-little:visited { border-color: #C0C0C0; @@ -58,4 +59,4 @@ .button-little:hover { background-color: #FFCC00; border-color: #D4AA00; -} \ No newline at end of file +} --=-=-=--