13 lines
470 B
Text
13 lines
470 B
Text
$NetBSD: patch-ac,v 1.1 2008/07/13 20:57:50 tonnerre Exp $
|
|
|
|
--- rcfile.ml.orig 2006-07-17 00:29:41.000000000 +0200
|
|
+++ rcfile.ml
|
|
@@ -128,7 +128,7 @@ let inverse_color_table = Hashtbl.create
|
|
(* Final hash table that maps from object to color_pair index *)
|
|
let object_palette = Hashtbl.create 20
|
|
|
|
-let tmpfile = "/tmp/wyrd-tmp." ^ (string_of_int (Unix.getuid ()))
|
|
+let tmpfile,tmpfd = Filename.open_temp_file "wyrd" "-temp"
|
|
|
|
|
|
(* Turn colors on and off *)
|