diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-09-26 04:25:13 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2009-09-26 04:25:13 +0200 |
| commit | a9c8026ca23ae980e0288b4657567fc586673e3c (patch) | |
| tree | 7ac4d8fe2fa8fbf6ef8d15baee64ca1b655f5e5e /elisp/geiser-plt.el | |
| parent | f4bfd4dbd6e91b60a80be309ffa70b7aeb7870a9 (diff) | |
| download | geiser-guile-a9c8026ca23ae980e0288b4657567fc586673e3c.tar.gz geiser-guile-a9c8026ca23ae980e0288b4657567fc586673e3c.tar.bz2 | |
Letting implementations define their own file pattern matching rules.
Diffstat (limited to 'elisp/geiser-plt.el')
| -rw-r--r-- | elisp/geiser-plt.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/elisp/geiser-plt.el b/elisp/geiser-plt.el index 00e3590..893b97a 100644 --- a/elisp/geiser-plt.el +++ b/elisp/geiser-plt.el @@ -175,6 +175,9 @@ This function uses `geiser-plt-init-file' if it exists." (display-help geiser-plt-external-help) (check-buffer geiser-plt-guess)) +(geiser-impl--add-to-alist 'regexp "\\.mzscheme\\.sl?s$" 'plt t) +(geiser-impl--add-to-alist 'regexp "\\.ss$" 'plt t) + (provide 'geiser-plt) ;;; geiser-plt.el ends here |