From 55efcccbde8a1ebbf30471b90c17744119979748 Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Wed, 24 Aug 2011 03:35:02 +0200 Subject: Guile: deprecated format usage eliminated Actually, i'm not even sure the calls to format i was using were correct at all! --- geiser/utils.scm | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'geiser/utils.scm') diff --git a/geiser/utils.scm b/geiser/utils.scm index 654cae8..92ed7ae 100644 --- a/geiser/utils.scm +++ b/geiser/utils.scm @@ -1,6 +1,6 @@ ;;; utils.scm -- utility functions -;; Copyright (C) 2009, 2010 Jose Antonio Ortega Ruiz +;; Copyright (C) 2009, 2010, 2011 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 @@ -46,9 +46,7 @@ (sort! syms cmp)))) (define (gensym? sym) - (and (symbol? sym) (gensym-name? (format "~A" sym)))) + (and (symbol? sym) (gensym-name? (format #f "~A" sym)))) (define (gensym-name? name) (and (string-match "^#[{]" name) #t)) - -;;; utils.scm ends here -- cgit v1.2.3