diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2012-09-30 01:48:31 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2012-09-30 01:48:31 +0200 |
| commit | a4dd6a93ffb8475df98baf8d3239cc404afd1460 (patch) | |
| tree | 1c1aae438d9804654d38a847d3f21d2df933c803 | |
| parent | b18bd1f1bdfbdd92d3167884676c59b4c27bde92 (diff) | |
| download | geiser-guile-a4dd6a93ffb8475df98baf8d3239cc404afd1460.tar.gz geiser-guile-a4dd6a93ffb8475df98baf8d3239cc404afd1460.tar.bz2 | |
Compilation warning
| -rw-r--r-- | elisp/geiser-table.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/elisp/geiser-table.el b/elisp/geiser-table.el index e4d4f43..11d94bb 100644 --- a/elisp/geiser-table.el +++ b/elisp/geiser-table.el @@ -1,6 +1,6 @@ ;;; geiser-table.el -- table creation -;; Copyright (C) 2009, 2010 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010, 2012 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 @@ -41,7 +41,7 @@ (let ((fill-column width)) (insert str) (fill-region (point-min) (point-max)) - (mapcar '(lambda (s) (geiser-table--pad-str s width)) + (mapcar (lambda (s) (geiser-table--pad-str s width)) (split-string (buffer-string) "\n")))))) (defun geiser-table--pad-row (row) |