Description: <short summary of the patch>
 TODO: Put a short summary on the line above and replace this paragraph
 with a longer explanation of this change. Complete the meta-information
 with other relevant fields (see below for details). To make it easier, the
 information below has been extracted from the changelog. Adjust it or drop
 it.
 .
 maxima (5.37.2-2) unstable; urgency=medium
 .
   * build-dep on latest gcl
   * remove obsolete compatability code in debian/rules
Author: Camm Maguire <camm@debian.org>

---
The information above should follow the Patch Tagging Guidelines, please
checkout http://dep.debian.net/deps/dep3/ to learn about the format. Here
are templates for supplementary fields that you might want to add:

Origin: <vendor|upstream|other>, <url of original patch>
Bug: <url in upstream bugtracker>
Bug-Debian: https://bugs.debian.org/<bugnumber>
Bug-Ubuntu: https://launchpad.net/bugs/<bugnumber>
Forwarded: <no|not-needed|url proving that it has been forwarded>
Reviewed-By: <name and email of someone who approved the patch>
Last-Update: <YYYY-MM-DD>

--- maxima-5.37.2.orig/doc/info/build_index.pl
+++ maxima-5.37.2/doc/info/build_index.pl
@@ -251,7 +251,7 @@ print ")))\n";
 
 #        Construct hashtables from the lists given above.
 
-print "(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))\n";
+print "(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))\n";
 
 # (2.3)  Do we have any items or sections?
 #
--- maxima-5.37.2.orig/doc/info/de.utf8/maxima-index.lisp
+++ maxima-5.37.2/doc/info/de.utf8/maxima-index.lisp
@@ -2673,4 +2673,4 @@
 ("Zufallszahlen" . ("maxima.info-2" 176979 2673))
 ("Zuweisungsoperatoren" . ("maxima.info-1" 291827 9886))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/doc/info/de/maxima-index.lisp
+++ maxima-5.37.2/doc/info/de/maxima-index.lisp
@@ -3119,4 +3119,4 @@
 ("Zufallszahlen" . ("maxima.info-2" 175691 2676))
 ("Zuweisungsoperatoren" . ("maxima.info-1" 289910 9871))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/doc/info/es.utf8/maxima-index.lisp
+++ maxima-5.37.2/doc/info/es.utf8/maxima-index.lisp
@@ -2683,4 +2683,4 @@
 ("Share" . ("maxima.info-5" 92734 592))
 ("Visualización usando VTK" . ("maxima.info-7" 168587 16606))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/doc/info/es/maxima-index.lisp
+++ maxima-5.37.2/doc/info/es/maxima-index.lisp
@@ -3129,4 +3129,4 @@
 ("Share" . ("maxima.info-4" 283571 593))
 ("Visualizacin usando VTK" . ("maxima.info-7" 7940 16632))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/doc/info/pt.utf8/maxima-index.lisp
+++ maxima-5.37.2/doc/info/pt.utf8/maxima-index.lisp
@@ -1888,4 +1888,4 @@
 ("Substantivos e Verbos" . ("maxima.info-1" 144085 2474))
 ("Visualização usando VTK" . ("maxima.info-5" 201854 353))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/doc/info/pt/maxima-index.lisp
+++ maxima-5.37.2/doc/info/pt/maxima-index.lisp
@@ -2238,4 +2238,4 @@
 ("Substantivos e Verbos" . ("maxima.info-1" 141644 2474))
 ("Visualizao usando VTK" . ("maxima.info-5" 142641 353))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/doc/info/pt_BR.utf8/maxima-index.lisp
+++ maxima-5.37.2/doc/info/pt_BR.utf8/maxima-index.lisp
@@ -2035,4 +2035,4 @@
 ("Sintaxe" . ("maxima.info-1" 156957 4247))
 ("Substantivos e Verbos" . ("maxima.info-1" 148614 2483))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/doc/info/pt_BR/maxima-index.lisp
+++ maxima-5.37.2/doc/info/pt_BR/maxima-index.lisp
@@ -2379,4 +2379,4 @@
 ("Sintaxe" . ("maxima.info-1" 154214 4238))
 ("Substantivos e Verbos" . ("maxima.info-1" 146036 2483))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/share/contrib/integration/integration-index.lisp
+++ maxima-5.37.2/share/contrib/integration/integration-index.lisp
@@ -15,4 +15,4 @@
 ("Definitions for abs_integrate" . ("abs_integrate.info" 3639 7412))
 ("Introduction to abs_integrate" . ("abs_integrate.info" 490 2999))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/share/contrib/maxima-odesolve/maxima-odesolve-index.lisp
+++ maxima-5.37.2/share/contrib/maxima-odesolve/maxima-odesolve-index.lisp
@@ -9,4 +9,4 @@
 ("Definitions for kovacicODE" . ("kovacicODE.info" 654 1493))
 ("Introduction to kovacicODE" . ("kovacicODE.info" 450 63))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/share/draw/draw-index.lisp
+++ maxima-5.37.2/share/draw/draw-index.lisp
@@ -8,4 +8,4 @@
 (section-pairs '(
 ; CONTENT: (<NODE NAME> . (<FILENAME> <BYTE OFFSET> <LENGTH IN CHARACTERS>))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
--- maxima-5.37.2.orig/share/logic/logic-index.lisp
+++ maxima-5.37.2/share/logic/logic-index.lisp
@@ -25,4 +25,4 @@
 ("Definitions for logic" . ("logic.info" 2434 10656))
 ("Introduction to logic" . ("logic.info" 386 1922))
 )))
-(load-info-hashtables (list (pathname-device #-gcl *load-pathname* #+gcl sys:*load-pathname*) (pathname-directory #-gcl *load-pathname* #+gcl sys:*load-pathname*)) deffn-defvr-pairs section-pairs))
+(load-info-hashtables (list (pathname-device *load-pathname*) (pathname-directory *load-pathname*)) deffn-defvr-pairs section-pairs))
