[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] Invalid read syntax: "?" when switching org-dates or when tying
From: |
Nicolas Goaziou |
Subject: |
Re: [O] Invalid read syntax: "?" when switching org-dates or when tying to org-submit-bug-report |
Date: |
Mon, 08 May 2017 11:09:34 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/25.2 (gnu/linux) |
Hello,
address@hidden writes:
> when i try to swicht an active timestamp via org-shitright or when i
> fire M-x org-submit-bug-report i get the following error:
>
> Debugger entered--Lisp error: (invalid-read-syntax "?")
> eval-buffer(#<buffer *load*> nil
> "c:/Users/sane/AppData/Roaming/.emacs.d/elpa/org-20170502/org-clock.el"
> nil t) ; Reading at buffer position 72111
>
> load-with-code-conversion("c:/Users/sane/AppData/Roaming/.emacs.d/elpa/org-20170502/org-clock.el"
> "c:/Users/sane/AppData/Roaming/.emacs.d/elpa/org-20170502/org-clock.el"
> nil t)
> require(org-clock)
> mapc(require (org-agenda org-archive org-attach org-clock org-colview
> org-id org-table org-timer))
> org-require-autoloaded-modules()
> org-submit-bug-report()
> call-interactively(org-submit-bug-report record nil)
> command-execute(org-submit-bug-report record)
> execute-extended-command(nil "org-submit-bug-report")
> call-interactively(execute-extended-command nil nil)
>
> I tried to do the same with Edebug on, but somehow it looks fine
> there.
Would the attached patch fix your issue?
Regards,
--
Nicolas Goaziou
>From 144c4ba61ba325f682088ba8501dccb3e20dbc8a Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <address@hidden>
Date: Mon, 8 May 2017 11:08:10 +0200
Subject: [PATCH] org-clock: Disambiguate character syntax
* lisp/org-clock.el (org-clock-put-overlay): Escape character in
character syntax.
---
lisp/org-clock.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index 462eda682..ea1ead47d 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -1967,7 +1967,8 @@ will be easy to remove."
(make-string
(max 0 (- (- 60 (current-column))
(- (match-end 4) (match-beginning 4))
- (length (org-get-at-bol 'line-prefix)))) ?·)
+ (length (org-get-at-bol 'line-prefix))))
+ ?\·)
'(face shadow))
(org-add-props
(format " %9s " (org-duration-from-minutes time))
--
2.12.2