diff options
| author | David Aspinall | 2008-01-16 12:47:21 +0000 |
|---|---|---|
| committer | David Aspinall | 2008-01-16 12:47:21 +0000 |
| commit | bee0fafacc925e6eb21fa8c2b9547c911e37d45c (patch) | |
| tree | 24d497e2f2d8831fd2798425a31abdfab19716c9 /generic/pg-metadata.el | |
| parent | 6044a343bc801f8bfe4ab3756e11f44a648a2edd (diff) | |
Compilation tweaks
Diffstat (limited to 'generic/pg-metadata.el')
| -rw-r--r-- | generic/pg-metadata.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/pg-metadata.el b/generic/pg-metadata.el index 86800e2a..32a61049 100644 --- a/generic/pg-metadata.el +++ b/generic/pg-metadata.el @@ -18,10 +18,13 @@ ;; NB: THIS FILE NOT YET USED: once required by PG, ;; must be added to main dist by editing Makefile.devel ;; +;; TODO: +;; - look at using cookies for this (Elib) ;;; Code: (require 'pg-xml) +(require 'proof-config) ; proof-face-specs (defcustom pg-metadata-default-directory "~/.proofgeneral/" "*Directory for storing metadata information about proof scripts." @@ -45,10 +48,7 @@ ;; Clashes are possible, hopefully unlikely. (concat (file-name-as-directory pg-metadata-default-directory) - (replace-in-string - (file-name-sans-extension filename) - (regexp-quote (char-to-string directory-sep-char)) - "__") + (replace-in-string (file-name-sans-extension filename) "/" "__") ".pgm")) |