From ba13256d20ce53c7a35092ae2d23debe64c764a5 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Wed, 11 Feb 2009 01:32:14 +0100 Subject: Compile file. --- elisp/geiser-base.el | 3 +++ 1 file changed, 3 insertions(+) (limited to 'elisp/geiser-base.el') 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) -- cgit v1.2.3