auctex-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[AUCTeX-diffs] Changes to auctex/style/emp.el,v


From: Ralf Angeli
Subject: [AUCTeX-diffs] Changes to auctex/style/emp.el,v
Date: Sun, 25 May 2008 06:50:38 +0000

CVSROOT:        /cvsroot/auctex
Module name:    auctex
Changes by:     Ralf Angeli <angeli>    08/05/25 06:50:33

Index: style/emp.el
===================================================================
RCS file: /cvsroot/auctex/auctex/style/emp.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- style/emp.el        3 Feb 2008 14:53:30 -0000       1.5
+++ style/emp.el        25 May 2008 06:50:32 -0000      1.6
@@ -43,9 +43,9 @@
 (defun LaTeX-env-emp-gen (environment-name)
    "Ask for file, width and length. Insert environment-name environment
 Used for emp, empdef, and empgraph environments."
-   (let ((emp-fig-name (read-input "figure name: " ""))
-        (emp-fig-width (read-input "figure width: " "1" ))
-        (emp-fig-height (read-input "figure height: " "1" ))
+   (let ((emp-fig-name (read-string "figure name: " ""))
+        (emp-fig-width (read-string "figure width: " "1" ))
+        (emp-fig-height (read-string "figure height: " "1" ))
         ;;; emp.sty demands a width and a height for each of the
         ;;; emp, empdef, and empgraph environments
         ;;; we give them 1 by default
@@ -65,7 +65,7 @@
 
 (defun LaTeX-env-empfile (optional)
    "Ask for file. Insert empfile environment"
-   (let ((empfile (read-input "empfile: " "")))
+   (let ((empfile (read-string "empfile: " "")))
      (if (not (zerop (length empfile)))
         (progn 
           (setq LaTeX-emp-file-name (concat LaTeX-optop empfile LaTeX-optcl))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]