Skip to content
This repository has been archived by the owner on Jan 23, 2018. It is now read-only.

Commit

Permalink
Whitespace cleanup
Browse files Browse the repository at this point in the history
  • Loading branch information
@purcell
purcell committed Oct 29, 2013
1 parent cf87284 commit e4c85ea
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions relax.el
View file
Original file line number Diff line number Diff line change
Expand Up @@ -128,11 +128,11 @@
(defun relax-create-db-menu (&rest ignore)
(let ((menu (make-sparse-keymap "Databases")))
(dolist (db (relax-url-completions))
(define-key-after menu (vector (intern (concat "relax-db-" db))) (cons db `(lambda () (interactive)
(define-key-after menu (vector (intern (concat "relax-db-" db))) (cons db `(lambda () (interactive)
(relax ,db)))))
menu))

(defvar relax-menu-bar
(defvar relax-menu-bar
(let ((menu (make-sparse-keymap "Relax")))
(define-key-after menu [relax-doc] '("Open doc" . relax-doc))
(define-key-after menu [relax-new-doc] '("New doc" . relax-new-doc))
Expand Down Expand Up @@ -161,7 +161,7 @@

(define-key map [menu-bar] (make-sparse-keymap))
(define-key map [menu-bar relax] (cons "Relax" relax-menu-bar))

map))

(defun relax-url-completions ()
Expand Down

0 comments on commit e4c85ea

Please sign in to comment.