Skip to content
Snippets Groups Projects
Commit da2cb2a5 authored by ram's avatar ram
Browse files

Replaced absolute pathnames with library: pathnames. Changed termcap-file from

a defconstant to a defvar.
parent 05e70794
No related branches found
No related tags found
No related merge requests found
...@@ -7,7 +7,7 @@ ...@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu. ;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;; ;;;
(ext:file-comment (ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/rompsite.lisp,v 1.1.1.11 1991/06/22 00:08:05 chiles Exp $") "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/hemlock/rompsite.lisp,v 1.1.1.12 1991/09/04 14:04:28 ram Exp $")
;;; ;;;
;;; ********************************************************************** ;;; **********************************************************************
;;; ;;;
...@@ -102,7 +102,7 @@ ...@@ -102,7 +102,7 @@
(defhvar "Cursor Bitmap File" (defhvar "Cursor Bitmap File"
"File to read to setup cursors for Hemlock windows. The mask is found by "File to read to setup cursors for Hemlock windows. The mask is found by
merging this name with \".mask\"." merging this name with \".mask\"."
:value "/usr/misc/.cmucl/lib/hemlock11.cursor") :value "library:hemlock11.cursor")
(defhvar "Enter Window Hook" (defhvar "Enter Window Hook"
"When the mouse enters an editor window, this hook is invoked. These "When the mouse enters an editor window, this hook is invoked. These
functions take the Hemlock Window as an argument." functions take the Hemlock Window as an argument."
...@@ -252,8 +252,7 @@ ...@@ -252,8 +252,7 @@
ed::*active-region-highlight-font*)) ed::*active-region-highlight-font*))
#+clx #+clx
(defparameter lisp-fonts-pathnames (defparameter lisp-fonts-pathnames '("library:fonts/"))
'("/usr/misc/.cmucl/lib/fonts/"))
(proclaim '(special *editor-input* *real-editor-input*)) (proclaim '(special *editor-input* *real-editor-input*))
...@@ -560,7 +559,7 @@ ...@@ -560,7 +559,7 @@
;;;; Current terminal character translation. ;;;; Current terminal character translation.
(defconstant termcap-file "/etc/termcap") (defvar termcap-file "/etc/termcap")
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment