Trailing whitepace deleted.
[bpt/emacs.git] / lisp / calc / calc-yank.el
index c8afb08..351a8ed 100644 (file)
@@ -3,7 +3,7 @@
 ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
 
 ;; Author: David Gillespie <daveg@synaptics.com>
-;; Maintainers: D. Goel <deego@gnufans.org> 
+;; Maintainers: D. Goel <deego@gnufans.org>
 ;;              Colin Walters <walters@debian.org>
 
 ;; This file is part of GNU Emacs.
 
 (defun calc-clean-newlines (s)
   (cond
-   
+
    ;; Omit leading/trailing whitespace
    ((or (string-match "\\`[ \n\r]+\\([^\001]*\\)\\'" s)
        (string-match "\\`\\([^\001]*\\)[ \n\r]+\\'" s))
    ((string-match "\\`\\(.*\\)[\n\r]+\\([^\001]*\\)\\'" s)
     (calc-clean-newlines (concat (math-match-substring s 1) ","
                                 (math-match-substring s 2))))
-   
+
    (t s)))