From f9f8be46e37c8adac372dfc17abc20557dfe9313 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Sun, 26 Mar 2017 21:27:58 +0200
Subject: [PATCH] Populate the filament_preset placeholder with all the
 presets. #3577

---
 lib/Slic3r/GUI/Plater.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/lib/Slic3r/GUI/Plater.pm b/lib/Slic3r/GUI/Plater.pm
index d71ba7c57..536f8be64 100644
--- a/lib/Slic3r/GUI/Plater.pm
+++ b/lib/Slic3r/GUI/Plater.pm
@@ -656,6 +656,7 @@ sub load_presets {
         @sel = (0) if !@sel;
         
         # populate the wxChoice objects
+        my @preset_names = ();
         foreach my $choice (@choosers) {
             $choice->Clear;
             $self->{preset_choosers_names}{$choice} = [];
@@ -691,11 +692,13 @@ sub load_presets {
                 $choice->SetSelection($selected);
                 
                 my $preset_name = $self->{preset_choosers_names}{$choice}[$selected];
-                $self->{print}->placeholder_parser->set("${group}_preset", $preset_name);
+                push @preset_names, $preset_name;
                 # TODO: populate other filament preset placeholders
                 $selected_printer_name = $preset_name if $group eq 'printer';
             }
         }
+        
+        $self->{print}->placeholder_parser->set("${group}_preset", [ @preset_names ]);
     }
 }