X-Git-Url: https://git.jsancho.org/?p=blog.git;a=blobdiff_plain;f=haunt.scm;h=6cdaae9d7e2223eb440afad2613d3419700f7393;hp=09bf58d941383d34cbcc1f858189995a71e482c0;hb=f2477e8ea7a9cfbb91703b8ad671f6c78e36081d;hpb=bf3407d4cf0fc1bf0a2a2473198096048ed1bcfa diff --git a/haunt.scm b/haunt.scm index 09bf58d..6cdaae9 100644 --- a/haunt.scm +++ b/haunt.scm @@ -66,7 +66,7 @@ `((article (@ (class "single")) (header (h1 ,(post-ref post 'title)) - (p "Posted on " ,(date->string (post-date post) "~B ~d, ~Y"))) + (p "Publicado el " ,(date->string (post-date post) "~d/~m/~Y"))) ,(post-sxml post) (div (@ (class "tag-cloud")) (p @@ -97,31 +97,38 @@ (h2 (a (@ (href ,(post-uri post))) ,(post-ref post 'title))) - (p "Posted on " ,(date->string (post-date post) "~B ~d, ~Y"))) + (p "Publicado el " ,(date->string (post-date post) "~d/~m/~Y"))) (div ,(post-summary post) (br) - (a (@ (class "btn") (href ,(post-uri post))) " Continue reading ")) + (a (@ (class "btn") (href ,(post-uri post))) " Seguir leyendo ")) (hr))) (posts/reverse-chronological posts)))))) (define about-page (static-page - "About me" + "Sobre mi" "about.html" - `((h2 "hi.")))) + `((div + (article + (header (h2 "Sobre mi")) + (p "Conocí GNU/Linux y el software libre durante mis estudios universitarios en la " (a (@ (href "http://www.uji.es/")) "Universitat Jaume I") " y desde entonces mi compromiso con esas ideas ha ido en aumento.") + (p "Fue en 2003 cuando empecé como activista, participando en eventos relacionados con el software libre, manifestaciones en contra de las patentes de software, charlas y jornadas informativas en parties, institutos, etc.") + (p "Disfruto programando y lo hago con el lenguaje que más se ajuste a mis necesidades (Python, PHP, Golang, Erlang, ...). Durante muchos años mi lenguaje favorito fue C, aunque con el tiempo ese lugar privilegiado han pasado a ocuparlo Lisp y Scheme a partes iguales. Soy un enamorado del paradigma funcional.") + (p "Estoy casado con una mujer maravillosa y tengo un hijo que no deja de sorprenderme cada día. Son mi mayor alegría.")))))) (define %collections `(("Home" "index.html" ,posts/reverse-chronological))) (site #:title "Javier Sancho" #:domain "jsancho.org" + #:build-directory "site-spanish" #:default-metadata '((author . "Javier Sancho") - (description . "Free Software Evangelist - Programmer") + (description . "Evangelizador del software libre - Programador") (email . "jsf@jsancho.org") (picture . "images/jsancho.jpg") - (pages . (("about" . "about.html") - ("projects" . "http://git.jsancho.org/")))) + (pages . (("sobre mi" . "about.html") + ("proyectos" . "http://git.jsancho.org/")))) #:readers (list sxml-reader html-reader) #:builders (list (blog #:theme flex-theme #:collections %collections) (atom-feed)