diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-03-07 21:28:28 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-03-07 21:28:28 +0100 |
| commit | 9f5d185d17c1e7258b9dc3df5fce46de7945ff12 (patch) | |
| tree | 847113f96814e8f5359f4ba607f475e88d1941b9 | |
| parent | 1e87980a965528177fef3cf97298f44ef02cbfc0 (diff) | |
| download | geiser-guile-9f5d185d17c1e7258b9dc3df5fce46de7945ff12.tar.gz geiser-guile-9f5d185d17c1e7258b9dc3df5fce46de7945ff12.tar.bz2 | |
Whitespace.
| -rw-r--r-- | elisp/geiser-company.el | 11 | ||||
| -rw-r--r-- | elisp/geiser-mode.el | 3 |
2 files changed, 9 insertions, 5 deletions
diff --git a/elisp/geiser-company.el b/elisp/geiser-company.el index 55a3097..8bb3c16 100644 --- a/elisp/geiser-company.el +++ b/elisp/geiser-company.el @@ -1,6 +1,6 @@ ;; geiser-company.el -- integration with company-mode -;; Copyright (C) 2009 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010 Jose Antonio Ortega Ruiz ;; This program is free software; you can redistribute it and/or ;; modify it under the terms of the Modified BSD License. You should @@ -96,9 +96,12 @@ (geiser-company--make-backend company-geiser-ids nil) (geiser-company--make-backend company-geiser-modules t) (add-to-list 'company-backends geiser-company--backend) - (add-hook 'company-completion-finished-hook 'geiser-company--restore-autodoc) - (add-hook 'company-completion-cancelled-hook 'geiser-company--restore-autodoc) - (add-hook 'company-completion-started-hook 'geiser-company--inhibit-autodoc))) + (add-hook 'company-completion-finished-hook + 'geiser-company--restore-autodoc) + (add-hook 'company-completion-cancelled-hook + 'geiser-company--restore-autodoc) + (add-hook 'company-completion-started-hook + 'geiser-company--inhibit-autodoc))) ;;; Reload support: diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el index 3e0f522..86baabc 100644 --- a/elisp/geiser-mode.el +++ b/elisp/geiser-mode.el @@ -205,7 +205,8 @@ interacting with the Geiser REPL is at your disposal. (defun geiser-mode--triple-chord (p k c) (define-key geiser-mode-map (vector '(control ?c) `(control ,p) k) c) - (define-key geiser-mode-map (vector '(control ?c) `(control ,p) `(control ,k)) c)) + (define-key geiser-mode-map (vector '(control ?c) `(control ,p) + `(control ,k)) c)) (define-key geiser-mode-map "\C-c\C-z" 'geiser-mode-switch-to-repl) (define-key geiser-mode-map "\C-c\C-s" 'geiser-set-scheme) |