emacs
/
mu
mirror of https://github.com/djcb/mu.git
1
0
Fork 0
Code Issues Releases Wiki Activity

* mm-main.el: update main view, support bookmarks

This commit is contained in:
djcb 2011-12-13 07:43:49 +02:00
parent 8ad1b738a3
commit 5f1eebcad5
1 changed files with 34 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
toys/mm/mm-main.el
View File

@ -29,6 +29,9 @@
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; mm main view mode + keybindings
(defconst mm/main-buffer-name "*mm*"
"*internal* Name of the mm main view buffer.")
(defvar mm/mm-mode-map
(let ((map (make-sparse-keymap)))
@ -71,10 +74,9 @@
str))
(defun mm()
"Start mm; should not be called directly, instead, use `mm'"
(interactive)
(let ((buf (get-buffer-create mm/mm-buffer-name))
(defun mm/main-view()
"Show the mm main view."
(let ((buf (get-buffer-create mm/main-buffer-name))
(inhibit-read-only t))
(with-current-buffer buf
(erase-buffer)