# HG changeset patch
# User Juri Linkov <juri@jurta.org>
# Date 1121699807 0
# Node ID 41bfd05eff2abdbb2bad5a4cbc5a3c8e60375d74
# Parent  8ec39ac5cfc8e966dadf9f1ecf6c393047445807
(calculator-copy): Delete duplicate words.

diff -r 8ec39ac5cfc8 -r 41bfd05eff2a lisp/calculator.el
--- a/lisp/calculator.el	Mon Jul 18 15:15:19 2005 +0000
+++ b/lisp/calculator.el	Mon Jul 18 15:16:47 2005 +0000
@@ -4,7 +4,7 @@
 
 ;; Author: Eli Barzilay <eli@barzilay.org>
 ;; Keywords: tools, convenience
-;; Time-stamp: <26 May 2005, 14:32:34, Lute Kamstra, pijl>
+;; Time-stamp: <2005-07-18 17:45:34 juri>
 
 ;; This file is part of GNU Emacs.
 
@@ -1594,7 +1594,7 @@
         (calculator-displayers
          (if calculator-copy-displayer nil calculator-displayers)))
     (calculator-enter)
-    ;; remove trailing spaces and and an index
+    ;; remove trailing spaces and an index
     (let ((s (cdr calculator-stack-display)))
       (and s
            (if (string-match "^\\([^ ]+\\) *\\(\\[[0-9/]+\\]\\)? *$" s)