diff options
author | Doug Evans <xdje42@gmail.com> | 2014-03-02 09:17:46 -0800 |
---|---|---|
committer | Doug Evans <xdje42@gmail.com> | 2014-03-02 09:17:46 -0800 |
commit | 667f9d0bddf4f0fd32702d7fd67454191a909911 (patch) | |
tree | 551087d24b655b4586778434c2f4f3baac9e9b10 /gdb/guile | |
parent | 8913591154e90b90910807abf469039373802322 (diff) | |
download | gdb-667f9d0bddf4f0fd32702d7fd67454191a909911.zip gdb-667f9d0bddf4f0fd32702d7fd67454191a909911.tar.gz gdb-667f9d0bddf4f0fd32702d7fd67454191a909911.tar.bz2 |
guile/lib/gdb/printing.scm (append-pretty-printer!): Fix thinko.
Diffstat (limited to 'gdb/guile')
-rw-r--r-- | gdb/guile/lib/gdb/printing.scm | 2 |
1 files changed, 1 insertions, 1 deletions
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!)))) |