gnu: guile-dbi: Switch to Guile 2.2.
* gnu/packages/guile.scm (guile-dbi)[inputs]: Switch to GUILE-2.2. [arguments]: Adjust to use "/2.2".
This commit is contained in:
		
							parent
							
								
									d5eacecc9f
								
							
						
					
					
						commit
						b989c3e376
					
				
					 1 changed files with 3 additions and 3 deletions
				
			
		| 
						 | 
					@ -1548,19 +1548,19 @@ provides access to that interface and its types from the Scheme level.")
 | 
				
			||||||
    (arguments
 | 
					    (arguments
 | 
				
			||||||
     '(#:configure-flags
 | 
					     '(#:configure-flags
 | 
				
			||||||
       (list (string-append
 | 
					       (list (string-append
 | 
				
			||||||
              "--with-guile-site-dir=" %output "/share/guile/site/2.0"))
 | 
					              "--with-guile-site-dir=" %output "/share/guile/site/2.2"))
 | 
				
			||||||
       #:phases
 | 
					       #:phases
 | 
				
			||||||
       (modify-phases %standard-phases
 | 
					       (modify-phases %standard-phases
 | 
				
			||||||
         (add-after 'install 'patch-extension-path
 | 
					         (add-after 'install 'patch-extension-path
 | 
				
			||||||
           (lambda* (#:key outputs #:allow-other-keys)
 | 
					           (lambda* (#:key outputs #:allow-other-keys)
 | 
				
			||||||
             (let* ((out     (assoc-ref outputs "out"))
 | 
					             (let* ((out     (assoc-ref outputs "out"))
 | 
				
			||||||
                    (dbi.scm (string-append
 | 
					                    (dbi.scm (string-append
 | 
				
			||||||
                              out "/share/guile/site/2.0/dbi/dbi.scm"))
 | 
					                              out "/share/guile/site/2.2/dbi/dbi.scm"))
 | 
				
			||||||
                    (ext     (string-append out "/lib/libguile-dbi")))
 | 
					                    (ext     (string-append out "/lib/libguile-dbi")))
 | 
				
			||||||
               (substitute* dbi.scm (("libguile-dbi") ext))
 | 
					               (substitute* dbi.scm (("libguile-dbi") ext))
 | 
				
			||||||
               #t))))))
 | 
					               #t))))))
 | 
				
			||||||
    (propagated-inputs
 | 
					    (propagated-inputs
 | 
				
			||||||
     `(("guile" ,guile-2.0)))
 | 
					     `(("guile" ,guile-2.2)))
 | 
				
			||||||
    (synopsis "Guile database abstraction layer")
 | 
					    (synopsis "Guile database abstraction layer")
 | 
				
			||||||
    (home-page "http://home.gna.org/guile-dbi/guile-dbi.html")
 | 
					    (home-page "http://home.gna.org/guile-dbi/guile-dbi.html")
 | 
				
			||||||
    (description
 | 
					    (description
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Reference in a new issue