From mboxrd@z Thu Jan 1 00:00:00 1970 From: Robert Klein Subject: [PATCH] Fix custom timestamps during export (ox-groff) Date: Mon, 13 Mar 2017 07:34:53 +0100 Message-ID: <20170313073453.104195eb@pckr186.mpip-mainz.mpg.de> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="MP_/Cz2ouLLXt.e1uqt81=too3H" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:55705) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1cnJZW-0004Gt-A1 for emacs-orgmode@gnu.org; Mon, 13 Mar 2017 02:35:11 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1cnJZM-0004ZM-HW for emacs-orgmode@gnu.org; Mon, 13 Mar 2017 02:35:06 -0400 Received: from mout.kundenserver.de ([212.227.126.133]:55674) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1cnJZM-0004YY-5m for emacs-orgmode@gnu.org; Mon, 13 Mar 2017 02:35:00 -0400 Received: from pckr186.mpip-mainz.mpg.de ([194.95.63.248]) by mrelayeu.kundenserver.de (mreue003 [212.227.15.167]) with ESMTPSA (Nemesis) id 0MMaiY-1csEiV2e6Q-008Ihm for ; Mon, 13 Mar 2017 07:34:57 +0100 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: emacs-orgmode@gnu.org --MP_/Cz2ouLLXt.e1uqt81=too3H Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Disposition: inline Hi, this patch updates ox-groff.el in contrig to use the org-timestamp-translate function instead of the non-existing org-translate-time. Best regards Robert --MP_/Cz2ouLLXt.e1uqt81=too3H Content-Type: text/x-patch Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename=0001-Fix-custom-timestamps-during-export-ox-groff.patch =46rom 632764856ecbc0f6a733d3d919f4904c6465605c Mon Sep 17 00:00:00 2001 From: Robert Klein Date: Mon, 13 Mar 2017 07:29:27 +0100 Subject: [PATCH] Fix custom timestamps during export (ox-groff) * contrib/lisp/ox-groff.el (org-groff-clock, org-groff-planning): Use org-translate-time'. (propagate changes introduced to other export backends in commit e1adb17ba509a43e9a03a5b367a98b8bc8de8b02.) --- contrib/lisp/ox-groff.el | 13 ++++--------- 1 file changed, 4 insertions(+), 9 deletions(-) diff --git a/contrib/lisp/ox-groff.el b/contrib/lisp/ox-groff.el index a9478b9..555a89d 100644 --- a/contrib/lisp/ox-groff.el +++ b/contrib/lisp/ox-groff.el @@ -823,9 +823,7 @@ information." (concat (format "\\fB%s\\fP " org-clock-string) (format org-groff-inactive-timestamp-format - (concat (org-translate-time - (org-element-property :raw-value - (org-element-property :value clock))) + (concat (org-timestamp-translate (org-element-property :value c= lock)) (let ((time (org-element-property :duration clock))) (and time (format " (%s)" time))))))) =20 @@ -1409,22 +1407,19 @@ information." (concat (format "\\fR %s \\fP" org-closed-string) (format org-groff-inactive-timestamp-format - (org-translate-time - (org-element-property :raw-value closed)))))) + (org-timestamp-translate closed))))) (let ((deadline (org-element-property :deadline planning))) (when deadline (concat (format "\\fB %s \\fP" org-deadline-string) (format org-groff-active-timestamp-format - (org-translate-time - (org-element-property :raw-value deadline)))))) + (org-timestamp-translate deadline))))) (let ((scheduled (org-element-property :scheduled planning))) (when scheduled (concat (format "\\fR %s \\fP" org-scheduled-string) (format org-groff-active-timestamp-format - (org-translate-time - (org-element-property :raw-value scheduled)))))))) + (org-timestamp-translate scheduled))))))) "") "")) =20 --=20 2.6.6 --MP_/Cz2ouLLXt.e1uqt81=too3H--