diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-11 01:32:14 +0100 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-02-11 01:32:14 +0100 |
| commit | b44d83032041daef01b29422d942289cc061be3d (patch) | |
| tree | ae4600121b82929dd3775fa4c4fe822332f93abd /elisp/geiser-base.el | |
| parent | c9f658fa24c6c11467e36037b621e68754edd897 (diff) | |
| download | geiser-b44d83032041daef01b29422d942289cc061be3d.tar.gz geiser-b44d83032041daef01b29422d942289cc061be3d.tar.bz2 | |
Compile file.
Diffstat (limited to 'elisp/geiser-base.el')
| -rw-r--r-- | elisp/geiser-base.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/elisp/geiser-base.el b/elisp/geiser-base.el index 4634a29..439a047 100644 --- a/elisp/geiser-base.el +++ b/elisp/geiser-base.el @@ -77,6 +77,9 @@ ;;; Utilities: +(defsubst geiser--chomp (str) + (if (string-match-p ".*\n$" str) (substring str 0 -1) str)) + (defun geiser--shorten-str (str len &optional sep) (let ((str-len (length str))) (if (<= str-len len) |