Emacs 组织模式组标记不工作(组织标记展开:错误的类型参数)
当我进入“议程”视图并尝试按标签进行筛选时,我不断遇到以下错误(Emacs 组织模式组标记不工作(组织标记展开:错误的类型参数),emacs,org-mode,Emacs,Org Mode,当我进入“议程”视图并尝试按标签进行筛选时,我不断遇到以下错误(C-C a t/TABPCRET): 我在OS X Yosemite上使用Emacs版本24.4(9.0)。组织模式版本为 Org-mode version 8.3beta (release_8.3beta-669-g077a24 @ /Applications/Emacs.app/Contents/Resources/lisp/org/) 我尝试过使用一个稳定的版本,然后升级到beta版,我仍然有同样的问题。我设置的任何组标记都
C-C a t/TAB
PCRET
):
我在OS X Yosemite上使用Emacs版本24.4(9.0)。组织模式版本为
Org-mode version 8.3beta (release_8.3beta-669-g077a24 @ /Applications/Emacs.app/Contents/Resources/lisp/org/)
我尝试过使用一个稳定的版本,然后升级到beta版,我仍然有同样的问题。我设置的任何组标记都有这个问题。创建自定义议程命令时也会发生这种情况
以下是我的.emacs文件:
;; -*- mode: lisp -*-
;; Disable the splash screen (to enable it agin, replace the t with 0)
(setq inhibit-splash-screen t)
(set-face-attribute 'default nil :height 120)
;; Enable transient mark mode
(transient-mark-mode 1)
;;;;org-mode configuration
;; Enable org-mode
(require 'org)
;;(setq org-todo-keywords
;; '((sequence "TODO" "IN-PROGRESS" "WAITING" "DONE")))
;; The following lines are always needed. Choose your own keys.
;; (add-to-list 'auto-mode-alist '("\\.org\\'" . org-mode)) ; not needed since Emacs 22.2
;; (add-hook 'org-mode-hook 'turn-on-font-lock) ; not needed when global-font-lock-mode is on
(global-set-key "\C-cl" 'org-store-link)
(global-set-key "\C-ca" 'org-agenda)
(global-set-key "\C-cb" 'org-iswitchb)
;; Make org-mode work with files ending in .org
;; (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
;; The above is the default in recent emacsen
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(org-agenda-custom-commands
(quote
(("cs" "Available SCHOOL"
((tags-todo "SCHOOL-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available SCHOOL")))
(agenda ""
((org-agenda-overriding-header "Available SCHOOL")
(org-agenda-tag-filter-preset
(quote
("+SCHOOL")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ch" "Available HOME"
((tags-todo "HOME-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available HOME")))
(agenda ""
((org-agenda-overriding-header "Deadlines HOME")
(org-agenda-tag-filter-preset
(quote
("+HOME")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ca" "Available ANYTIME"
((tags-todo "ANYTIME-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available ANYTIME")))
(agenda ""
((org-agenda-overriding-header "Deadlines ANYTIME")
(org-agenda-tag-filter-preset
(quote
("+ANYTIME")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ce" "Available ERRANDS"
((tags-todo "ERRANDS-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available ERRANDS")))
(agenda ""
((org-agenda-overriding-header "Deadlines ERRANDS")
(org-agenda-tag-filter-preset
(quote
("+ERRANDS")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cq" "Available PARENTS"
((tags-todo "PARENTS-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PARENTS")))
(agenda ""
((org-agenda-overriding-header "Deadlines PARENTS")
(org-agenda-tag-filter-preset
(quote
("+PARENTS")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ck" "Available KOBO"
((tags-todo "KOBO-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available KOBO")))
(agenda ""
((org-agenda-overriding-header "Deadlines KOBO")
(org-agenda-tag-filter-preset
(quote
("+KOBO")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cn" "Available PHONE"
((tags-todo "PHONE-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PHONE")))
(agenda ""
((org-agenda-overriding-header "Deadlines PHONE")
(org-agenda-tag-filter-preset
(quote
("+PHONE")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cp" "Available PC"
((tags-todo "PC-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PC")))
(agenda ""
((org-agenda-overriding-header "Deadlines PC")
(org-agenda-tag-filter-preset
(quote
("+PC")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cx" "Available PCDesktop"
((tags-todo "PCDesktop-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PCDesktop")))
(agenda ""
((org-agenda-overriding-header "Deadlines PCDesktop")
(org-agenda-tag-filter-preset
(quote
("+PCDesktop")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cy" "Available PCMobile"
((tags-todo "PCMobile-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PCMobile")))
(agenda ""
((org-agenda-overriding-header "Deadlines PCMobile")
(org-agenda-tag-filter-preset
(quote
("+PCMobile")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cw" "Available WORK"
((tags-todo "WORK-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available WORK")))
(agenda ""
((org-agenda-overriding-header "Deadlines WORK")
(org-agenda-tag-filter-preset
(quote
("+WORK")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil))))
'(org-agenda-dim-blocked-tasks (quote invisible))
'(org-agenda-files (quote ("~/GTD.org")))
'(org-enforce-todo-dependencies t)
'(org-tags-exclude-from-inheritance
(quote
("Project" "Folder" "Taskgroup" "Single_Action_List"))))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)
;;-*-模式:lisp-*-
;; 禁用启动屏幕(要再次启用,请将t替换为0)
(setq禁止启动屏幕t)
(设置面属性“默认为零:高度120”)
;; 启用瞬态标记模式
(瞬态标记模式1)
;;;;组织模式配置
;; 启用组织模式
(需要“组织”)
;;(setq组织todo关键字)
;'((顺序“TODO”“正在进行”“等待”“完成”))
;; 始终需要以下行。选择你自己的钥匙。
;; (添加到列表“自动模式列表”(“\\.org\\'”.org mode));自Emacs 22.2以来不需要
;; (添加钩子“组织模式钩子”打开字体锁定);启用全局字体锁定模式时不需要
(全局设置键“\C-cl”'组织存储链接)
(全局设置键“\C-ca”'组织议程)
(全局设置键“\C-cb”'组织iswitchb)
;; 使组织模式与以.org结尾的文件一起工作
;; (添加到列表“自动模式列表”(“\\.org$”.org mode))
;; 以上是最近emacsen中的默认设置
(自定义设置变量)
;自定义设置变量由自定义添加。
如果你手工编辑,可能会把它弄糟,所以要小心。
;init文件应该只包含一个这样的实例。
如果不止一个,它们就不能正常工作。
'(组织议程)自定义命令
(引述
(“cs”“可供选择的学校”
((标记todo“SCHOOL-todo=\“WAITING\”-容器计划>\“\”-某天)
((组织议程覆盖标题“可用学校”))
(议程项目“”
((组织议程覆盖标题“可用学校”)
(组织议程标记过滤器预设)
(引述
(“+学校”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“ch”“可用家庭”
((标记todo“HOME-todo=\“WAITING\”-容器计划>\“\”-某一天)
((组织议程覆盖标题“可用主页”))
(议程项目“”
((组织议程覆盖标题“截止日期主页”)
(组织议程标记过滤器预设)
(引述
(“+家”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“ca”随时可用)
((标记todo“ANYTIME-todo=\“WAITING\”-容器计划>\“\”-某天)
((组织议程覆盖标题“随时可用”))
(议程项目“”
((组织议程覆盖标题“任何时候的截止日期”)
(组织议程标记过滤器预设)
(引述
(“+任何时候”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“ce”“可用差事”
((标记todo“差事-todo=\“等待\”-容器计划>\“\”-某一天”
((组织议程覆盖标题“可用差事”))
(议程项目“”
((组织议程覆盖标题“截止日期差事”)
(组织议程标记过滤器预设)
(引述
(“+差事”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“cq”“可用家长”
((标记todo“PARENTS-todo=\“WAITING\”-容器计划>\“\”-某一天)
((组织议程覆盖标题“可用家长”))
(议程项目“”
((组织议程覆盖标题“截止日期”)
(组织议程标记过滤器预设)
(引述
(“+父母”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“ck”“可用KOBO”
((标记todo“KOBO-todo=\“等待\”-容器计划>\“\”-某一天)
((组织议程覆盖标题“可用KOBO”))
(议程项目“”
((组织议程覆盖标题“截止日期KOBO”)
(组织议程标记过滤器预设)
(引述
(“+KOBO”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“cn”“可用电话”
((标记todo“PHONE-todo=\“WAITING\”-容器计划>\“\”-某天)
((组织议程覆盖标题“可用电话”))
(议程项目“”
((组织议程覆盖标题“截止日期电话”)
(组织议程标记过滤器预设)
(引述
(“+电话”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“cp”“可用PC”
((标记todo“PC-todo=\“等待\”-容器计划>\“\”-某一天)
((组织议程覆盖标题“可用PC”))
(议程项目“”
((组织议程覆盖标题“截止日期PC”)
(组织议程标记过滤器预设)
(引述
(“+PC”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“cx”可用PC桌面
((标记todo“PCDesktop todo=\“WAITING\”-容器计划>\“\”-某一天)
((组织议程覆盖标题“可用PCDesktop”))
(议程项目“”
((组织议程覆盖标题“桌面”)
(组织议程标记过滤器预设)
(引述
(“+PCDesktop”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“cy”“可用PCMobile”
((标记todo“PCMobile todo=\“等待\”-容器计划>\“\”-某一天)
((组织议程覆盖标题“可用PCMobile”))
(议程项目“”
((组织议程覆盖标题“截止日期”)
(组织议程标记过滤器预设)
(引述
(“+PCMobile”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零(零)
(“cw”“可用工作”
((标记todo“WORK-todo=\“WAITING\”-容器计划>\“\”-某天)
((组织议程覆盖标题“可用工作”))
(议程项目“”
((组织议程覆盖标题“截止日期工作”)
(组织议程标记过滤器预设)
(引述
(“+工作”))
(组织)议程条目类型
(引述
(:截止日期:时间戳(()()))
零零))
"(或
Org-mode version 8.3beta (release_8.3beta-669-g077a24 @ /Applications/Emacs.app/Contents/Resources/lisp/org/)
;; -*- mode: lisp -*-
;; Disable the splash screen (to enable it agin, replace the t with 0)
(setq inhibit-splash-screen t)
(set-face-attribute 'default nil :height 120)
;; Enable transient mark mode
(transient-mark-mode 1)
;;;;org-mode configuration
;; Enable org-mode
(require 'org)
;;(setq org-todo-keywords
;; '((sequence "TODO" "IN-PROGRESS" "WAITING" "DONE")))
;; The following lines are always needed. Choose your own keys.
;; (add-to-list 'auto-mode-alist '("\\.org\\'" . org-mode)) ; not needed since Emacs 22.2
;; (add-hook 'org-mode-hook 'turn-on-font-lock) ; not needed when global-font-lock-mode is on
(global-set-key "\C-cl" 'org-store-link)
(global-set-key "\C-ca" 'org-agenda)
(global-set-key "\C-cb" 'org-iswitchb)
;; Make org-mode work with files ending in .org
;; (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
;; The above is the default in recent emacsen
(custom-set-variables
;; custom-set-variables was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
'(org-agenda-custom-commands
(quote
(("cs" "Available SCHOOL"
((tags-todo "SCHOOL-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available SCHOOL")))
(agenda ""
((org-agenda-overriding-header "Available SCHOOL")
(org-agenda-tag-filter-preset
(quote
("+SCHOOL")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ch" "Available HOME"
((tags-todo "HOME-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available HOME")))
(agenda ""
((org-agenda-overriding-header "Deadlines HOME")
(org-agenda-tag-filter-preset
(quote
("+HOME")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ca" "Available ANYTIME"
((tags-todo "ANYTIME-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available ANYTIME")))
(agenda ""
((org-agenda-overriding-header "Deadlines ANYTIME")
(org-agenda-tag-filter-preset
(quote
("+ANYTIME")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ce" "Available ERRANDS"
((tags-todo "ERRANDS-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available ERRANDS")))
(agenda ""
((org-agenda-overriding-header "Deadlines ERRANDS")
(org-agenda-tag-filter-preset
(quote
("+ERRANDS")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cq" "Available PARENTS"
((tags-todo "PARENTS-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PARENTS")))
(agenda ""
((org-agenda-overriding-header "Deadlines PARENTS")
(org-agenda-tag-filter-preset
(quote
("+PARENTS")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("ck" "Available KOBO"
((tags-todo "KOBO-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available KOBO")))
(agenda ""
((org-agenda-overriding-header "Deadlines KOBO")
(org-agenda-tag-filter-preset
(quote
("+KOBO")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cn" "Available PHONE"
((tags-todo "PHONE-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PHONE")))
(agenda ""
((org-agenda-overriding-header "Deadlines PHONE")
(org-agenda-tag-filter-preset
(quote
("+PHONE")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cp" "Available PC"
((tags-todo "PC-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PC")))
(agenda ""
((org-agenda-overriding-header "Deadlines PC")
(org-agenda-tag-filter-preset
(quote
("+PC")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cx" "Available PCDesktop"
((tags-todo "PCDesktop-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PCDesktop")))
(agenda ""
((org-agenda-overriding-header "Deadlines PCDesktop")
(org-agenda-tag-filter-preset
(quote
("+PCDesktop")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cy" "Available PCMobile"
((tags-todo "PCMobile-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available PCMobile")))
(agenda ""
((org-agenda-overriding-header "Deadlines PCMobile")
(org-agenda-tag-filter-preset
(quote
("+PCMobile")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil)
("cw" "Available WORK"
((tags-todo "WORK-TODO=\"WAITING\"-Container-SCHEDULED>\"<now>\"-Someday"
((org-agenda-overriding-header "Available WORK")))
(agenda ""
((org-agenda-overriding-header "Deadlines WORK")
(org-agenda-tag-filter-preset
(quote
("+WORK")))
(org-agenda-entry-types
(quote
(:deadline :timestamp))))))
nil nil))))
'(org-agenda-dim-blocked-tasks (quote invisible))
'(org-agenda-files (quote ("~/GTD.org")))
'(org-enforce-todo-dependencies t)
'(org-tags-exclude-from-inheritance
(quote
("Project" "Folder" "Taskgroup" "Single_Action_List"))))
(custom-set-faces
;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
)