[O] if: Wrong type argument: stringp, \.\.\.
Hello group, I'm stumped. When I try to bring up the agenda with C-c a, I get the error message mentioned in the subject line. I'm using 23.2.1 on Windoze 7 64 bit, and the orgmode from today: M-x org-version: 7.5 Here's my entire org-mode related part of my .emacs: , | ;; | ;; Org Mode | ;; | | ;; save all org buffers at 1 minute before the hour | (run-at-time "00:59" 3600 'org-save-all-org-buffers) | | ;; no need to compile the sources | (add-to-list 'load-path "~/.emacs.d/org-mode/lisp/") | (add-to-list 'load-path "~/.emacs.d/org-mode/contrib/lisp/") | (setq org-directory "h:/org/") | (require 'org-install) | | ;; Custom Key Bindings | (global-set-key "\C-cl" 'org-store-link) | (global-set-key "\C-ca" 'org-agenda) | (global-set-key "\C-cb" 'org-iswitchb) | (global-set-key (kbd "") 'bh/clock-in-600-install-default-task) | (global-set-key (kbd "") 'org-cycle-agenda-files) | (global-set-key (kbd " b") 'bh/clock-in-NMR-booking-task) | (global-set-key (kbd " g") 'gnus) | (global-set-key (kbd " m") 'bh/clock-in-email-task) | (global-set-key (kbd " o") 'bh/clock-in-organization-task) | (global-set-key (kbd " p") 'bh/clock-in-phone-task) | (global-set-key (kbd " r") 'bh/clock-in-read-task) | (global-set-key (kbd " R") 'bh/clock-in-repair-task) | (global-set-key (kbd " SPC") 'bh/clock-in-last-task) | (global-set-key (kbd "") 'hist-org-clock-in-select) | (global-set-key (kbd "") 'org-clock-goto) | (global-set-key (kbd "") 'org-agenda) ` Any hints are highly appreciated. Thanks Markus
Re: [O] if: Wrong type argument: stringp, \.\.\.
Markus Heller wrote: > Hello group, > > I'm stumped. When I try to bring up the agenda with C-c a, I get the > error message mentioned in the subject line. > > I'm using 23.2.1 on Windoze 7 64 bit, and the orgmode from today: > > M-x org-version: 7.5 > > Here's my entire org-mode related part of my .emacs: > > , > | ;; > | ;; Org Mode > | ;; > | > | ;; save all org buffers at 1 minute before the hour > | (run-at-time "00:59" 3600 'org-save-all-org-buffers) > | > | ;; no need to compile the sources > | (add-to-list 'load-path "~/.emacs.d/org-mode/lisp/") > | (add-to-list 'load-path "~/.emacs.d/org-mode/contrib/lisp/") > | (setq org-directory "h:/org/") > | (require 'org-install) > | > | ;; Custom Key Bindings > | (global-set-key "\C-cl" 'org-store-link) > | (global-set-key "\C-ca" 'org-agenda) > | (global-set-key "\C-cb" 'org-iswitchb) > | (global-set-key (kbd "") 'bh/clock-in-600-install-default-task) > | (global-set-key (kbd "") 'org-cycle-agenda-files) > | (global-set-key (kbd " b") 'bh/clock-in-NMR-booking-task) > | (global-set-key (kbd " g") 'gnus) > | (global-set-key (kbd " m") 'bh/clock-in-email-task) > | (global-set-key (kbd " o") 'bh/clock-in-organization-task) > | (global-set-key (kbd " p") 'bh/clock-in-phone-task) > | (global-set-key (kbd " r") 'bh/clock-in-read-task) > | (global-set-key (kbd " R") 'bh/clock-in-repair-task) > | (global-set-key (kbd " SPC") 'bh/clock-in-last-task) > | (global-set-key (kbd "") 'hist-org-clock-in-select) > | (global-set-key (kbd "") 'org-clock-goto) > | (global-set-key (kbd "") 'org-agenda) > ` > > Any hints are highly appreciated. > We need a backtrace: see section 1.4, "Feedback", of the Org manual on how to get one. Nick
Re: [O] if: Wrong type argument: stringp, \.\.\.
Nick Dokos writes:
> Markus Heller wrote:
>
>> Hello group,
>>
>> I'm stumped. When I try to bring up the agenda with C-c a, I get the
>> error message mentioned in the subject line.
>>
>> I'm using 23.2.1 on Windoze 7 64 bit, and the orgmode from today:
>>
>> M-x org-version: 7.5
>>
>> Here's my entire org-mode related part of my .emacs:
>>
>> ,
>> | ;;
>> | ;; Org Mode
>> | ;;
>> |
>> | ;; save all org buffers at 1 minute before the hour
>> | (run-at-time "00:59" 3600 'org-save-all-org-buffers)
>> |
>> | ;; no need to compile the sources
>> | (add-to-list 'load-path "~/.emacs.d/org-mode/lisp/")
>> | (add-to-list 'load-path "~/.emacs.d/org-mode/contrib/lisp/")
>> | (setq org-directory "h:/org/")
>> | (require 'org-install)
>> |
>> | ;; Custom Key Bindings
>> | (global-set-key "\C-cl" 'org-store-link)
>> | (global-set-key "\C-ca" 'org-agenda)
>> | (global-set-key "\C-cb" 'org-iswitchb)
>> | (global-set-key (kbd "") 'bh/clock-in-600-install-default-task)
>> | (global-set-key (kbd "") 'org-cycle-agenda-files)
>> | (global-set-key (kbd " b") 'bh/clock-in-NMR-booking-task)
>> | (global-set-key (kbd " g") 'gnus)
>> | (global-set-key (kbd " m") 'bh/clock-in-email-task)
>> | (global-set-key (kbd " o") 'bh/clock-in-organization-task)
>> | (global-set-key (kbd " p") 'bh/clock-in-phone-task)
>> | (global-set-key (kbd " r") 'bh/clock-in-read-task)
>> | (global-set-key (kbd " R") 'bh/clock-in-repair-task)
>> | (global-set-key (kbd " SPC") 'bh/clock-in-last-task)
>> | (global-set-key (kbd "") 'hist-org-clock-in-select)
>> | (global-set-key (kbd "") 'org-clock-goto)
>> | (global-set-key (kbd "") 'org-agenda)
>> `
>>
>> Any hints are highly appreciated.
>>
>
> We need a backtrace: see section 1.4, "Feedback", of the Org manual on how
> to get one.
>
> Nick
Ok, below is the backtrace. Geez, how can one read anything useful out
of this? ;-)
Cheers
Markus
Debugger entered--Lisp error: (error ":END: line missing at position 15207")
signal(error (":END: line missing at position 15207"))
error(":END: line missing at position %s" 15207)
(if (re-search-forward "^[]*:END:" (save-excursion ... ...) t)
(outline-flag-region b (point-at-eol) flag) (error ":END: line missing at
position %s" b))
(let ((b ...) (outline-regexp org-outline-regexp)) (if (re-search-forward "^[
]*:END:" ... t) (outline-flag-region b ... flag) (error ":END: line
missing at position %s" b)))
(progn (let (... ...) (if ... ... ...)))
(if (looking-at "^[ ]*:[a-zA-Z][a-zA-Z0-9]*:") (progn (let ... ...)))
(when (looking-at "^[ ]*:[a-zA-Z][a-zA-Z0-9]*:") (let (... ...) (if
... ... ...)))
(save-excursion (beginning-of-line 1) (when (looking-at "^[
]*:[a-zA-Z][a-zA-Z0-9]*:") (let ... ...)))
org-flag-drawer(t)
(while (re-search-forward org-drawer-regexp end t) (org-flag-drawer t))
(let* ((globalp ...) (beg ...) (end ...)) (goto-char beg) (while
(re-search-forward org-drawer-regexp end t) (org-flag-drawer t)))
(save-excursion (let* (... ... ...) (goto-char beg) (while ... ...)))
(progn (save-excursion (let* ... ... ...)))
(if (and (org-mode-p) (not ...)) (progn (save-excursion ...)))
(when (and (org-mode-p) (not ...)) (save-excursion (let* ... ... ...)))
org-cycle-hide-drawers(all)
(if (eq org-startup-folded (quote showeverything)) nil (if
org-hide-block-startup (org-hide-block-all))
(org-set-visibility-according-to-property (quote no-cleanup))
(org-cycle-hide-archived-subtrees (quote all)) (org-cycle-hide-drawers (quote
all)) (org-cycle-show-empty-lines t))
(unless (eq org-startup-folded (quote showeverything)) (if
org-hide-block-startup (org-hide-block-all))
(org-set-visibility-according-to-property (quote no-cleanup))
(org-cycle-hide-archived-subtrees (quote all)) (org-cycle-hide-drawers (quote
all)) (org-cycle-show-empty-lines t))
org-set-startup-visibility()
(if org-inhibit-startup-visibility-stuff nil (org-set-startup-visibility))
(unless org-inhibit-startup-visibility-stuff (org-set-startup-visibility))
(if org-inhibit-startup nil (when org-startup-align-all-tables (let ... ...
...)) (when org-startup-with-inline-images (org-display-inline-images)) (when
org-startup-indented (require ...) (org-indent-mode 1)) (unless
org-inhibit-startup-visibility-stuff (org-set-startup-visibility)))
(unless org-inhibit-startup (when org-startup-align-all-tables (let ... ...
...)) (when org-startup-with-inline-images (org-display-inline-images)) (when
org-startup-indented (require ...) (org-indent-mode 1)) (unless
org-inhibit-startup-visibility-stuff (org-set-startup-visibility)))
(let ((delay-mode-hooks t)) (outline-mode) (setq major-mode (quote org-mode))
(setq mode-name "Org") (progn (if ... ...) (unless ... ...) (let ... ...))
(use-local-map org-mode-map) (set-syntax-table org-mode-syntax-table) (setq
local-abbrev-table org-mode-abbrev-table) (if (featurep ...) (when ... ... ...
...) (define-key org-mode-map [menu-bar headings] ...) (define-key org-mode-m
Re: [O] if: Wrong type argument: stringp, \.\.\.
Hi Markus,
It looks like you have a drawer in your org files that is missing
a closing :END: tag. Possibly in file "h:/org/600_install.org"
HTH,
Bernt
Markus Heller writes:
> Nick Dokos writes:
>
>> Markus Heller wrote:
>>
>>> Hello group,
>>>
>>> I'm stumped. When I try to bring up the agenda with C-c a, I get the
>>> error message mentioned in the subject line.
>>>
>>> I'm using 23.2.1 on Windoze 7 64 bit, and the orgmode from today:
>>>
>>> M-x org-version: 7.5
>>>
>>> Here's my entire org-mode related part of my .emacs:
>>>
>>> ,
>>> | ;;
>>> | ;; Org Mode
>>> | ;;
>>> |
>>> | ;; save all org buffers at 1 minute before the hour
>>> | (run-at-time "00:59" 3600 'org-save-all-org-buffers)
>>> |
>>> | ;; no need to compile the sources
>>> | (add-to-list 'load-path "~/.emacs.d/org-mode/lisp/")
>>> | (add-to-list 'load-path "~/.emacs.d/org-mode/contrib/lisp/")
>>> | (setq org-directory "h:/org/")
>>> | (require 'org-install)
>>> |
>>> | ;; Custom Key Bindings
>>> | (global-set-key "\C-cl" 'org-store-link)
>>> | (global-set-key "\C-ca" 'org-agenda)
>>> | (global-set-key "\C-cb" 'org-iswitchb)
>>> | (global-set-key (kbd "") 'bh/clock-in-600-install-default-task)
>>> | (global-set-key (kbd "") 'org-cycle-agenda-files)
>>> | (global-set-key (kbd " b") 'bh/clock-in-NMR-booking-task)
>>> | (global-set-key (kbd " g") 'gnus)
>>> | (global-set-key (kbd " m") 'bh/clock-in-email-task)
>>> | (global-set-key (kbd " o") 'bh/clock-in-organization-task)
>>> | (global-set-key (kbd " p") 'bh/clock-in-phone-task)
>>> | (global-set-key (kbd " r") 'bh/clock-in-read-task)
>>> | (global-set-key (kbd " R") 'bh/clock-in-repair-task)
>>> | (global-set-key (kbd " SPC") 'bh/clock-in-last-task)
>>> | (global-set-key (kbd "") 'hist-org-clock-in-select)
>>> | (global-set-key (kbd "") 'org-clock-goto)
>>> | (global-set-key (kbd "") 'org-agenda)
>>> `
>>>
>>> Any hints are highly appreciated.
>>>
>>
>> We need a backtrace: see section 1.4, "Feedback", of the Org manual on how
>> to get one.
>>
>> Nick
>
> Ok, below is the backtrace. Geez, how can one read anything useful out
> of this? ;-)
>
> Cheers
> Markus
>
> Debugger entered--Lisp error: (error ":END: line missing at position 15207")
> signal(error (":END: line missing at position 15207"))
> error(":END: line missing at position %s" 15207)
> (if (re-search-forward "^[ ]*:END:" (save-excursion ... ...) t)
> (outline-flag-region b (point-at-eol) flag) (error ":END: line missing at
> position %s" b))
> (let ((b ...) (outline-regexp org-outline-regexp)) (if (re-search-forward
> "^[ ]*:END:" ... t) (outline-flag-region b ... flag) (error ":END: line
> missing at position %s" b)))
> (progn (let (... ...) (if ... ... ...)))
> (if (looking-at "^[ ]*:[a-zA-Z][a-zA-Z0-9]*:") (progn (let ...
> ...)))
> (when (looking-at "^[ ]*:[a-zA-Z][a-zA-Z0-9]*:") (let (... ...) (if
> ... ... ...)))
> (save-excursion (beginning-of-line 1) (when (looking-at "^[
> ]*:[a-zA-Z][a-zA-Z0-9]*:") (let ... ...)))
> org-flag-drawer(t)
> (while (re-search-forward org-drawer-regexp end t) (org-flag-drawer t))
> (let* ((globalp ...) (beg ...) (end ...)) (goto-char beg) (while
> (re-search-forward org-drawer-regexp end t) (org-flag-drawer t)))
> (save-excursion (let* (... ... ...) (goto-char beg) (while ... ...)))
> (progn (save-excursion (let* ... ... ...)))
> (if (and (org-mode-p) (not ...)) (progn (save-excursion ...)))
> (when (and (org-mode-p) (not ...)) (save-excursion (let* ... ... ...)))
> org-cycle-hide-drawers(all)
> (if (eq org-startup-folded (quote showeverything)) nil (if
> org-hide-block-startup (org-hide-block-all))
> (org-set-visibility-according-to-property (quote no-cleanup))
> (org-cycle-hide-archived-subtrees (quote all)) (org-cycle-hide-drawers (quote
> all)) (org-cycle-show-empty-lines t))
> (unless (eq org-startup-folded (quote showeverything)) (if
> org-hide-block-startup (org-hide-block-all))
> (org-set-visibility-according-to-property (quote no-cleanup))
> (org-cycle-hide-archived-subtrees (quote all)) (org-cycle-hide-drawers (quote
> all)) (org-cycle-show-empty-lines t))
> org-set-startup-visibility()
> (if org-inhibit-startup-visibility-stuff nil (org-set-startup-visibility))
> (unless org-inhibit-startup-visibility-stuff (org-set-startup-visibility))
> (if org-inhibit-startup nil (when org-startup-align-all-tables (let ... ...
> ...)) (when org-startup-with-inline-images (org-display-inline-images)) (when
> org-startup-indented (require ...) (org-indent-mode 1)) (unless
> org-inhibit-startup-visibility-stuff (org-set-startup-visibility)))
> (unless org-inhibit-startup (when org-startup-align-all-tables (let ... ...
> ...)) (when org-startup-with-inline-images (org-display-inline-images)) (when
> org-startup-indented (require ...) (org-indent-mode 1)) (unless
> org-inhibit-startup-visibility-stuff (org-set-startup-visibility)))
> (let ((delay-mode-hooks t)) (outline-mode)
Re: [O] if: Wrong type argument: stringp, \.\.\.
Markus Heller wrote:
> Debugger entered--Lisp error: (error ":END: line missing at position 15207")
> signal(error (":END: line missing at position 15207"))
> error(":END: line missing at position %s" 15207)
You seem to be missing an :END: line (or it may be malformed, so that the
regexp below does
not match) ...
> (if (re-search-forward "^[ ]*:END:" (save-excursion ... ...) t)
> (outline-flag-region b (point-at-eol) flag) (error ":END: line missing at
> position %s" b))
> (let ((b ...) (outline-regexp org-outline-regexp)) (if (re-search-forward
> "^[ ]*:END:" ... t) (outline-flag-region b ... flag) (error ":END: line
> missing at position %s" b)))
> (progn (let (... ...) (if ... ... ...)))
> (if (looking-at "^[ ]*:[a-zA-Z][a-zA-Z0-9]*:") (progn (let ...
> ...)))
> (when (looking-at "^[ ]*:[a-zA-Z][a-zA-Z0-9]*:") (let (... ...) (if
> ... ... ...)))
> (save-excursion (beginning-of-line 1) (when (looking-at "^[
> ]*:[a-zA-Z][a-zA-Z0-9]*:") (let ... ...)))
> org-flag-drawer(t)
... in a drawer ...
> (while (re-search-forward org-drawer-regexp end t) (org-flag-drawer t))
> (let* ((globalp ...) (beg ...) (end ...)) (goto-char beg) (while
> (re-search-forward org-drawer-regexp end t) (org-flag-drawer t)))
> (save-excursion (let* (... ... ...) (goto-char beg) (while ... ...)))
> (progn (save-excursion (let* ... ... ...)))
> (if (and (org-mode-p) (not ...)) (progn (save-excursion ...)))
> (when (and (org-mode-p) (not ...)) (save-excursion (let* ... ... ...)))
> org-cycle-hide-drawers(all)
> ...
> org-set-startup-visibility()
> (if org-inhibit-startup-visibility-stuff nil (org-set-startup-visibility))
> (unless org-inhibit-startup-visibility-stuff (org-set-startup-visibility))
> ...
> org-mode()
> set-auto-mode-0(org-mode nil)
> set-auto-mode()
> normal-mode(t)
> after-find-file(nil t)
> find-file-noselect-1(# "h:/org/600_install.org" nil
> nil "h:/org/600_install.org" (0 (9885 . 5800)))
... in this file.
Position 15207 in the file is where the code choked, but it may be
missing earlier in the file. If you can't find it, and you don't mind
making the file public, post it here. If you'd rather not, but still
can't find it, as a last resort, you can send it to me: I promise not to
look unnecessarily :-)
HTH,
Nick
Re: [O] if: Wrong type argument: stringp, \.\.\.
Bernt Hansen writes: > Hi Markus, > > It looks like you have a drawer in your org files that is missing > a closing :END: tag. Possibly in file "h:/org/600_install.org" Hi Bernt and Nick, yes, there is/was an issue with a missing :END: in that particular file. I kept adding it, but for some weird reason, it was automatically removed again. But doesn't matter, I'm in the process of overhauling my orgmode files and use anyway :-) Thanks and Cheers Markus
Re: [O] if: Wrong type argument: stringp, \.\.\.
Hi Markus, Markus Heller writes: > yes, there is/was an issue with a missing :END: in that particular > file. I kept adding it, but for some weird reason, it was automatically > removed again. If you find a way of reproducing cases where :END: is removed without you noticing it, that'd be helpful. Thanks! -- Bastien
