From 667f9d0bddf4f0fd32702d7fd67454191a909911 Mon Sep 17 00:00:00 2001 From: Doug Evans Date: Sun, 2 Mar 2014 09:17:46 -0800 Subject: [PATCH] guile/lib/gdb/printing.scm (append-pretty-printer!): Fix thinko. --- gdb/ChangeLog | 4 ++++ gdb/guile/lib/gdb/printing.scm | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 43243a6..08dd1c3 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,7 @@ +2014-03-02 Doug Evans + + * guile/lib/gdb/printing.scm (append-pretty-printer!): Fix thinko. + 2014-03-01 Mark Kettenis * obsd-nat.c: Include "gdb_wait.h" instead of . diff --git a/gdb/guile/lib/gdb/printing.scm b/gdb/guile/lib/gdb/printing.scm index 36e3275..2944702 100644 --- a/gdb/guile/lib/gdb/printing.scm +++ b/gdb/guile/lib/gdb/printing.scm @@ -47,6 +47,6 @@ If OBJ is #f, add MATCHER to the global list." ((objfile? obj) (set-objfile-pretty-printers! obj (append! (objfile-pretty-printers obj) - matcher))) + (list matcher)))) (else (%assert-type #f obj SCM_ARG1 'append-pretty-printer!)))) -- 2.7.4