From f76340bd11dc6eb5cf6c22cb5f39e76d52b15d66 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Fri, 6 Sep 2019 00:37:47 +0100
Subject: whitespace

---
 elisp/geiser-chicken.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

(limited to 'elisp')

diff --git a/elisp/geiser-chicken.el b/elisp/geiser-chicken.el
index dff028f..3403989 100644
--- a/elisp/geiser-chicken.el
+++ b/elisp/geiser-chicken.el
@@ -295,8 +295,12 @@ This function uses `geiser-chicken-init-file' if it exists."
       (geiser-eval--send/wait load-sequence))))
 
 (defun geiser-chicken5-load ()
-  (let ((source (expand-file-name "chicken/geiser/chicken5.scm" geiser-scheme-dir)))
-    (geiser-eval--send/wait (format "(display '((result . t) (output . f))) (load \"%s\") (import geiser)"  source))))
+  (let ((source (expand-file-name "chicken/geiser/chicken5.scm"
+                                  geiser-scheme-dir)))
+    (geiser-eval--send/wait
+     (format
+      "(display '((result . t) (output . f))) (load \"%s\") (import geiser)"
+      source))))
 
 (defun geiser-chicken--startup (remote)
   (compilation-setup t)
-- 
cgit v1.2.3


From 846b23d70c47b2d7b48000f2f2455ffd48405c33 Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Sat, 12 Oct 2019 22:17:54 +0100
Subject: Missing require (fixes issue #285)

Seems we forgot a require while adding a new defcustom in geiser-log.
---
 elisp/geiser-log.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'elisp')

diff --git a/elisp/geiser-log.el b/elisp/geiser-log.el
index 91ed639..7b4193e 100644
--- a/elisp/geiser-log.el
+++ b/elisp/geiser-log.el
@@ -1,6 +1,6 @@
 ;; geiser-log.el -- logging utilities
 
-;; Copyright (C) 2009, 2010, 2012 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009, 2010, 2012, 2019 Jose Antonio Ortega Ruiz
 
 ;; This program is free software; you can redistribute it and/or
 ;; modify it under the terms of the Modified BSD License. You should
@@ -14,6 +14,7 @@
 ;; Some utilities for maintaining a simple log buffer, mainly for
 ;; debugging purposes.
 
+(require 'geiser-custom)
 (require 'geiser-popup)
 (require 'geiser-base)
 
-- 
cgit v1.2.3


From a1c992a583d9a320ca75c3a001a8ff196c13bc01 Mon Sep 17 00:00:00 2001
From: Brian Leung <leungbk@mailfence.com>
Date: Mon, 21 Oct 2019 16:49:08 -0700
Subject: elisp/geiser.doc.el: Add geiser-doc-manual-for-symbol.

---
 elisp/geiser-doc.el | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'elisp')

diff --git a/elisp/geiser-doc.el b/elisp/geiser-doc.el
index 7810957..a982997 100644
--- a/elisp/geiser-doc.el
+++ b/elisp/geiser-doc.el
@@ -382,6 +382,11 @@ With prefix argument, ask for symbol (with completion)."
                      "Symbol: " (geiser--symbol-at-point)))))
     (when symbol (geiser-doc-symbol symbol))))
 
+(defun geiser-doc-manual-for-symbol (symbol)
+  (geiser-doc--external-help geiser-impl--implementation
+                             symbol
+                             (geiser-eval--get-module)))
+
 (defun geiser-doc-look-up-manual (&optional arg)
   "Look up manual for symbol at point.
 With prefix argument, ask for the lookup symbol (with completion)."
@@ -390,9 +395,7 @@ With prefix argument, ask for the lookup symbol (with completion)."
     (error "No manual available"))
   (let ((symbol (or (and (not arg) (geiser--symbol-at-point))
                     (geiser-completion--read-symbol "Symbol: "))))
-    (geiser-doc--external-help geiser-impl--implementation
-                               symbol
-                               (geiser-eval--get-module))))
+    (geiser-doc-manual-for-symbol symbol)))
 
 (defconst geiser-doc--sections '(("Procedures:" "procs")
                                  ("Syntax:" "syntax")
-- 
cgit v1.2.3


From 8d84a1fbc45de10f934aff2680bfba188a514a71 Mon Sep 17 00:00:00 2001
From: Artem Chernyak <acher@tuta.io>
Date: Tue, 22 Oct 2019 16:13:18 +0000
Subject: Automatically enable racket for .rktd and .rktl files.

---
 elisp/geiser-racket.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'elisp')

diff --git a/elisp/geiser-racket.el b/elisp/geiser-racket.el
index 2df2461..ebe748c 100644
--- a/elisp/geiser-racket.el
+++ b/elisp/geiser-racket.el
@@ -445,7 +445,7 @@ Use a prefix to be asked for a submodule name."
   (binding-forms* geiser-racket--binding-forms*))
 
 (geiser-impl--add-to-alist 'regexp "\\.ss$" 'racket t)
-(geiser-impl--add-to-alist 'regexp "\\.rkt$" 'racket t)
+(geiser-impl--add-to-alist 'regexp "\\.rkt[dl]?$" 'racket t)
 
 (defun run-gracket ()
   "Start the Racket REPL using gracket instead of plain racket."
-- 
cgit v1.2.3