diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-02-27 22:55:44 +0100 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2010-02-27 22:55:44 +0100 |
commit | 2b57e2a87b5ba7c65a3c8fe5b997205e2d829874 (patch) | |
tree | 50989c226f599be227366bf02f9ec0abb456ea30 | |
parent | 5d713118a24a8766ea788288c1b47c96cf9bf5a6 (diff) | |
download | geiser-guile-2b57e2a87b5ba7c65a3c8fe5b997205e2d829874.tar.gz geiser-guile-2b57e2a87b5ba7c65a3c8fe5b997205e2d829874.tar.bz2 |
Whitespace.
-rw-r--r-- | elisp/geiser-completion.el | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/elisp/geiser-completion.el b/elisp/geiser-completion.el index 60b288e..9efe89f 100644 --- a/elisp/geiser-completion.el +++ b/elisp/geiser-completion.el @@ -1,6 +1,6 @@ ;;; geiser-completion.el -- tab completion -;; 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 @@ -137,7 +137,8 @@ terminates a current completion." (defun geiser-completion--symbol-list (prefix) (delete-duplicates (append (all-completions prefix - (mapcar 'symbol-name (geiser-syntax--locals-around-point))) + (mapcar 'symbol-name + (geiser-syntax--locals-around-point))) (geiser-eval--send/result `(:eval ((:ge completions) ,prefix)))) :test 'string=)) @@ -240,7 +241,8 @@ closing parenthesis, try completion otherwise." (interactive) (let ((indent (or (bolp) (memq (syntax-class (syntax-after (1- (point)))) '(0 5))))) - (if indent (indent-according-to-mode) (geiser-completion--complete-symbol)))) + (if indent (indent-according-to-mode) + (geiser-completion--complete-symbol)))) (define-minor-mode geiser-smart-tab-mode "Toggle smart tab mode. |