1. xemacs
  2. xemacs-devel


steveb  committed 30d4b5c

bench.el temp dir fixes

  • Participants
  • Parent commits 06a9030
  • Branches default

Comments (0)

Files changed (3)

File ChangeLog

View file
  • Ignore whitespace
+1998-10-20  Andy Piper  <andyp@parallax.co.uk>
+	* bench.el (bench-large-lisp-file): use temp-directory rather than
+	home-grown temp-dir.
+	(bench-small-lisp-file): ditto.
+	(temp-dir): removed.
 1998-09-18  Noah Friedman  <friedman@splode.com>
 	* eldoc.el (eldoc-message): Check for 1-arg case, and store string

File Makefile

View file
  • Ignore whitespace
 # This XEmacs package contains independent single file lisp packages
-VERSION = 1.19
+VERSION = 1.20
 MAINTAINER = XEmacs Development Team <xemacs-beta@xemacs.org>
 PACKAGE = xemacs-devel

File bench.el

View file
  • Ignore whitespace
 			  (substring rcsvers 11 (- (length rcsvers) 2)))
   "*Version number of bench.el")
-(defconst temp-dir (file-name-as-directory
-		    (or (getenv "TMPDIR")
-			(getenv "TMP")
-			(getenv "TEMP")
-			"/tmp/")))
-(defconst bench-large-lisp-file (concat temp-dir "./bench-large.el")
+(defconst bench-large-lisp-file (concat (temp-directory) "./bench-large.el")
   "Large lisp file to use in benchmarks should be /temp-dir/bench-text.el")
-(defconst bench-small-lisp-file (concat temp-dir "./bench-small.el")
+(defconst bench-small-lisp-file (concat (temp-directory) "./bench-small.el")
   "Large lisp file to use in benchmarks should be /temp-dir/bench-text.el")
 (defconst bench-lisp-file bench-large-lisp-file)