Re: Starting buffer configuration

[Silvio Levy <levy@msri.org>]

Dear Drew,

Thanks for this very informative answer to Yotam's question.  
I just checked out Bookmark+ and it looks good: thanks for writing it!

I get an error when doing exactly as you said (having placed the 8
bookmark+* files on my emacs path). The whole debug output is copied
after my signature; the gist (which appears when I type C-x r l) is

Symbol's function definition is void: with-buffer-modified-unmodified

I'm using GNU Emacs 23.1.50.1.

Silvio Levy




Debugger entered--Lisp error: (void-function with-buffer-modified-unmodified)
  (with-buffer-modified-unmodified (save-excursion (save-window-excursion ... ... ... ...)))
  (progn (unless no-msg-p (message "Showing file names...")) (with-buffer-modified-unmodified (save-excursion ...)) (unless no-msg-p (message "Showing file names...done")) (when (and ... ...) (fit-frame-if-one-window)))
  (if (or force bookmark-bmenu-toggle-filenames) (progn (unless no-msg-p ...) (with-buffer-modified-unmodified ...) (unless no-msg-p ...) (when ... ...)))
  (when (or force bookmark-bmenu-toggle-filenames) (unless no-msg-p (message "Showing file names...")) (with-buffer-modified-unmodified (save-excursion ...)) (unless no-msg-p (message "Showing file names...done")) (when (and ... ...) (fit-frame-if-one-window)))
  bookmark-bmenu-show-filenames(nil)
  (if bookmark-bmenu-toggle-filenames (bookmark-bmenu-show-filenames no-msg-p) (bookmark-bmenu-hide-filenames no-msg-p))
  (let ((bookmark-bmenu-toggle-filenames ...)) (if bookmark-bmenu-toggle-filenames (bookmark-bmenu-show-filenames no-msg-p) (bookmark-bmenu-hide-filenames no-msg-p)))
  bookmark-bmenu-toggle-filenames(t)
  (progn (bookmark-bmenu-toggle-filenames t))
  (if bookmark-bmenu-toggle-filenames (progn (bookmark-bmenu-toggle-filenames t)))
  (when bookmark-bmenu-toggle-filenames (bookmark-bmenu-toggle-filenames t))
  (let* ((inhibit-read-only t) (title ...) (show-image-file-icon-p ...)) (erase-buffer) (when (fboundp ...) (remove-images ... ...)) (insert (format "%s\n%s\n" title ...)) (add-text-properties (point-min) (point) (bmkp-face-prop ...)) (goto-char (point-min)) (insert (format "Bookmark file:\n%s\n\n" bmkp-current-bookmark-file)) (forward-line bmkp-bmenu-header-lines) (let (... name markedp tags annotation temporaryp start) (setq bmkp-sorted-alist ...) (dolist ... ...) (setq max-width ...) (dolist ... ... ... ... ... ... ... ... ... ... ... ...)) (goto-char (point-min)) (forward-line bmkp-bmenu-header-lines) (bookmark-bmenu-mode) (when bookmark-bmenu-toggle-filenames (bookmark-bmenu-toggle-filenames t)) (when (and ... ...) (fit-frame-if-one-window)))
  bmkp-bmenu-list-1(filteredp nil 1)
  (let ((bookmark-alist ...)) (bmkp-bmenu-list-1 (quote filteredp) nil msgp))
  (cond ((and bmkp-bmenu-first-time-p bmkp-bmenu-state-file ...) (let ... ... ...) (setq bmkp-bmenu-first-time-p nil) (let ... ...) (when ... ...) (when ... ...) (when bmkp-last-bmenu-bookmark ...)) (t (setq bmkp-bmenu-first-time-p nil) (bmkp-bmenu-list-1 filteredp ... msgp)))
  bookmark-bmenu-list(nil 1)
  call-interactively(bookmark-bmenu-list)
  eval-buffer(#<buffer  *load*> nil "/home/levy/.emacs" nil t)  ; Reading at buffer position 328
  load-with-code-conversion("/home/levy/.emacs" "/home/levy/.emacs" t t)
  load("~/.emacs" t t)
  #[nil "\b\205\264emacs" windows-nt directory-files nil "^\\.emacs\\(\\.elc?\\)?$" "~/.emacs" "^_emacs\\(\\.elc?\\)?$" "~/_emacs" "/.emacs" t load expand-file-name "init" file-name-as-directory "/.emacs.d" file-name-extension "elc" file-name-sans-extension ".el" file-exists-p file-newer-than-file-p message "Warning: %s is newer than %s" sit-for 1 "default" alt inhibit-default-init inhibit-startup-screen] 7]()
  command-line()
  normal-top-level()