[Emacs-diffs] Changes to emacs/lisp/calc/calc-frac.el

[Jay Belanger]

Index: emacs/lisp/calc/calc-frac.el
diff -c emacs/lisp/calc/calc-frac.el:1.7 emacs/lisp/calc/calc-frac.el:1.8
*** emacs/lisp/calc/calc-frac.el:1.7    Mon Sep  1 15:45:18 2003
--- emacs/lisp/calc/calc-frac.el        Mon Nov  1 20:06:46 2004
***************
*** 54,65 ****
  
  
  (defun calc-over-notation (fmt)
!   (interactive
!    (list
!     (completing-read "Fraction separator: " (mapcar (lambda (s)
!                                                     (cons s 0))
!                                                   '(":" "::" "/" "//" ":/"))
!                    nil t)))
    (calc-wrapper
     (if (string-match "\\`\\([^ 0-9][^ 0-9]?\\)[0-9]*\\'" fmt)
         (let ((n nil))
--- 54,60 ----
  
  
  (defun calc-over-notation (fmt)
!   (interactive "sFraction separator: ")
    (calc-wrapper
     (if (string-match "\\`\\([^ 0-9][^ 0-9]?\\)[0-9]*\\'" fmt)
         (let ((n nil))