← Back to branch summary

~ubuntu-branches/debian/sid/geiser/sid

« back to all changes in this revision

Viewing changes to elisp/geiser-popup.el

  • Committer: Package Import Robot
  • Author(s): David Bremner
  • Date: 2014-01-02 05:47:26 UTC
  • mfrom: (1.2.2)
  • Revision ID: package-import@ubuntu.com-20140102054726-m51lz69elsy2r6el
Tags: 0.5-1
New upstream release

Show diffs side-by-side

added added

removed removed

Lines of Context:
elisp/geiser-popup.el
1
1
;; geiser-popup.el -- popup windows
2
2
 
3
 
;; Copyright (C) 2009, 2010, 2012 Jose Antonio Ortega Ruiz
 
3
;; Copyright (C) 2009, 2010, 2012, 2013 Jose Antonio Ortega Ruiz
4
4
 
5
5
;; This program is free software; you can redistribute it and/or
6
6
;; modify it under the terms of the Modified BSD License. You should
16
16
 
17
17
(defvar geiser-popup--registry nil)
18
18
 
19
 
(setq geiser-popup--overriding-map
 
19
(defvar geiser-popup--overriding-map
20
20
  (let ((map (make-sparse-keymap)))
21
21
    (define-key map "q" 'View-quit)
22
22
    map))