]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/context-def.cc
lilypond-book: Specify filename and ext for all snippets.
[lilypond.git] / lily / context-def.cc
index 5dd1684a8375a50c494812e8b123084d5b98e787..df866c2472a62d7d476b0798ce73ff5270bfe05c 100644 (file)
@@ -1,7 +1,7 @@
 /*
   This file is part of LilyPond, the GNU music typesetter.
 
-  Copyright (C) 2000--2011 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  Copyright (C) 2000--2012 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
   LilyPond is free software: you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
@@ -174,8 +174,7 @@ Context_def::get_accepted (SCM user_mod) const
   SCM def = get_default_child (user_mod);
   if (scm_is_symbol (def))
     {
-      if (scm_memq (def, acc))
-        acc = scm_delete_x (def, acc);
+      acc = scm_delete_x (def, acc);
       acc = scm_cons (def, acc);
     }