[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[emacs-wiki-discuss] Error "Symbol's function definition is void: custom
From: |
Alec Clews |
Subject: |
[emacs-wiki-discuss] Error "Symbol's function definition is void: custom-quote" |
Date: |
Sun, 7 May 2006 10:35:25 +1000 |
I have installed emacs-planner according to the instructions at
http://www.plannerlove.com/pmwiki/pmwiki.php?n=Main.QuickStart
I am using SUSE Open Linux 10( X86_64), Emacs 21.3 on an HP nx6125
(AMD Turion64 CPU)
Can anyone suggest how I can fix this please? I have located the
apparent offending line in /muse/lisp/muse-project.el, however as I
have no lisp or Emacs programming experience I'm not sure how to
proceed.
Here are the details
When I run Emacs I get the following error messages
-------------------------------------------------------------------------------------
(emacs)
Loading tool-bar...done
Loading image...done
Loading tooltip...done
Loading rng-auto.el (source)...done
Loading /usr/lib/emacs/21.3/x86_64-suse-linux/fns-21.3.1.el (source)...done
Loading paren...done
Loading encoded-kb...done
Loading regexp-opt...done
An error has occurred while loading `/home/alec/.emacs':
Symbol's function definition is void: custom-quote
To ensure normal operation, you should investigate the cause
of the error in your initialization file and remove it. Start
Emacs with the `--debug-init' option to view a complete error
backtrace
Loading mwheel...done
Loading lazy-lock...done
-------------------------------------------------------------------------------------
When I run emacs with the --debug-init option I get the this
-------------------------------------------------------------------------------------
Debugger entered--Lisp error: (void-function custom-quote)
(custom-quote val)
(list (custom-quote val))
(put sym (quote saved-value) (list (custom-quote val)))
(progn (put sym (quote saved-value) (list ...)) (while val (let ...
... ...) (let ... ...) (setq val ...)))
(if muse-project-alist-using-customize (progn (put sym ... ...)
(while val ... ... ...)))
(when muse-project-alist-using-customize (put sym (quote
saved-value) (list ...)) (while val (let ... ... ...) (let ... ..
.) (setq val ...)))
muse-project-alist-set(muse-project-alist (("WikiPlanner"
("~/elisp/plans" ... ... ...))))
custom-initialize-reset(muse-project-alist nil)
custom-declare-variable(muse-project-alist nil "An alist of Muse
projects.\nA project defines a fileset, and a list of cus
tom attributes for use\nwhen publishing files in that project." :type
(choice (const :tag "No projects defined." nil) (repea
t (cons :format "%{%t%}:\n\n%v" :tag "Project" :indent 4 ...
muse-project)) (sexp :tag "Cannot parse expression")) :get muse
-project-alist-get :set muse-project-alist-set :group muse-project)
(defcustom muse-project-alist nil "An alist of Muse projects.\nA
project defines a fileset, and a list of custom attribute
s for use\nwhen publishing files in that project." :type (quote
(choice ... ... ...)) :get (quote muse-project-alist-get) :s
et (quote muse-project-alist-set) :group (quote muse-project))
eval-buffer(#<buffer *load*<3>> nil "muse-project" nil t)
load-with-code-conversion("/home/alec/elisp/muse/lisp/muse-project.el"
"muse-project" nil t)
require(muse-project)
eval-buffer(#<buffer *load*<2>> nil "muse-mode" nil t)
load-with-code-conversion("/home/alec/elisp/muse/lisp/muse-mode.el"
"muse-mode" nil t)
require(muse-mode)
eval-buffer(#<buffer *load*> nil "~/.emacs" nil t)
load-with-code-conversion("/home/alec/.emacs" "~/.emacs" t t)
load("~/.emacs" t t)
#[nil address@hidden@307^H310Q2025^@
311=203'address@hidden@address@hidden@
address@hidden@307^H321Q^Z322
address@hidden@address@hidden@address@hidden@address@hidden
address@hidden"address@hidden@313^^
323336322211#))207" [init-file-user system-type user-in
it-file-1 user-init-file source alt ms-dos "~" "/_emacs" windows-nt
directory-files nil "^\\.emacs\\(\\.elc?\\)?$" "~/.emacs
" "~/_emacs" vax-vms "sys$login:.emacs" "/.emacs" t load
file-name-extension "elc" file-name-sans-extension ".el" file-exist
s-p file-newer-than-file-p message "Warning: %s is newer than %s"
sit-for 1 "default" inhibit-default-init inhibit-startup-m
essage] 5]()
command-line()
normal-top-level()
------------------------------------------------------------------------------------------------------------------
my .emacs file looks like this
------------------------------------------------------------------------------------------------------------------
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; File name: ` ~/.emacs '
;;; ---------------------
;;;
;;; If you need your own personal ~/.emacs
;;; please make a copy of this file
;;; an placein your changes and/or extension.
;;;
;;; Copyright (c) 1997-2002 SuSE Gmbh Nuernberg, Germany.
;;;
;;; Author: Werner Fink, <address@hidden> 1997,98,99,2002
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
;;; Test of Emacs derivates
;;; -----------------------
(if (string-match "XEmacs\\|Lucid" emacs-version)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; XEmacs
;;; ------
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(progn
(if (file-readable-p "~/.xemacs/init.el")
(load "~/.xemacs/init.el" nil t))
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; GNU-Emacs
;;; ---------
;;; load ~/.gnu-emacs or, if not exists /etc/skel/.gnu-emacs
;;; For a description and the settings see /etc/skel/.gnu-emacs
;;; ... for your private ~/.gnu-emacs your are on your one.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(if (file-readable-p "~/.gnu-emacs")
(load "~/.gnu-emacs" nil t)
(if (file-readable-p "/etc/skel/.gnu-emacs")
(load "/etc/skel/.gnu-emacs" nil t)))
;; Custum Settings
;; ===============
;; To avoid any trouble with the customization system of GNU emacs
;; we set the default file ~/.gnu-emacs-custom
(setq custom-file "~/.gnu-emacs-custom")
(load "~/.gnu-emacs-custom" t t)
;;;
)
;;;
;; Sample configuration file for Muse, Planner and Remember
;; ================================================================
;; CHANGE BASE-DIRECTORY TO POINT TO THE DIRECTORY YOU UNPACKED FILES TO
;; For example, this works if you used
;; mkdir ~/elisp
;; tar -zxvfC plannerbundle.tar.gz ~/elisp
(defvar my/base-directory "~/elisp" "Base directory where I
unpacked the Lisp files.")
(defvar my/planner-directory "~/elisp/plans" "Directory for my Planner
text files.")
(defvar my/planner-newbie-p t "*Set to nil if you don't want any of
the newbie help stuff.")
(require 'info)
(let ((base-directory "~/elisp"))
(add-to-list 'load-path (concat base-directory "/muse/lisp"))
(add-to-list 'load-path (concat base-directory "/planner"))
(add-to-list 'load-path (concat base-directory "/remember"))
(add-to-list 'Info-directory-list (concat base-directory "/planner"))
(add-to-list 'Info-directory-list (concat base-directory "/muse"))
(add-to-list 'Info-directory-list (concat base-directory "/remember-el")))
;; Muse configuration
(setq muse-project-alist
`(("WikiPlanner"
(,my/planner-directory
:default "index"
:major-mode planner-mode
:visit-link planner-visit-link))))
(setq muse-file-extension "txt")
(setq muse-mode-auto-p t)
;; Load code
(require 'muse-mode)
(require 'muse-project)
(require 'muse-wiki)
(require 'muse-colors)
(require 'planner)
(require 'planner-lisp)
(require 'planner-auto)
(require 'remember)
(require 'remember-planner)
(when my/planner-newbie-p
;; Stuff to make newbies' lives easier
(setq planner-day-page-template
(concat
"TAB/SHIFT-TAB: switch between links "
"RET/ENTER: follow link\n"
"[[lisp:planner-goto][Jump to date]] (C-c C-j C-d) "
"[[lisp:planner-goto-today][Today]] (C-c C-j C-j)\n"
"[[lisp:planner-goto-yesterday][Previous day]] (C-c C-j C-y)
"
"[[lisp:planner-goto-tomorrow][Next day]] (C-c C-j C-t)\n"
"[[lisp:planner-create-task-from-buffer][New task]] (C-c
C-t) "
"[[lisp:remember][New note]] (M-x remember)\n\n"
"* Tasks\n\n\n* Schedule\n\n\n* Notes\n\n\n")))
;; Display today's page
(plan)
(when my/planner-newbie-p
(planner-find-file "WelcomePage" 'find-file-other-window))
;; Finish setting up remember
(setq remember-annotation-functions planner-annotation-functions)
(setq remember-handler-functions '(remember-planner-append))
------------------------------------------------------------------------------------------------------------------
Many thanks
--
Alec Clews, Melbourne, Australia
- [emacs-wiki-discuss] Error "Symbol's function definition is void: custom-quote",
Alec Clews <=