From 2d819f14b82dae57f5c5af2ea808f734c1efb1a4 Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Mon, 22 Feb 2010 10:00:47 -0800 Subject: [PATCH] Fix bugs in the Combo Box, and the Mimetype form elements. Fixes bug #11420. --- docs/changelog/7.x.x.txt | 3 ++- lib/WebGUI/Form/Combo.pm | 1 + lib/WebGUI/Form/MimeType.pm | 2 ++ 3 files changed, 5 insertions(+), 1 deletion(-) diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index b7d206c7e..a6d1b4e8d 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -2,7 +2,8 @@ - fixed #11418: confusing typ-o in gotcha - fixed #11415: Wiki - Edit page appearing below the content - fixed #11414: SQLReport Pagination Setting - + - fixed #11420: Snippet not save mimetype + 7.8.12 - fixed #11285: Pasting HTML into Code Editor in IE - fixed #11349: Code editor returns newline for blank content diff --git a/lib/WebGUI/Form/Combo.pm b/lib/WebGUI/Form/Combo.pm index 064fca39c..c2b41ef5b 100644 --- a/lib/WebGUI/Form/Combo.pm +++ b/lib/WebGUI/Form/Combo.pm @@ -122,6 +122,7 @@ sub toHtml { my $options = $self->getOptions; $options->{''} = '['.$i18n->get(582).']'; $options->{_new_} = $i18n->get(581).'->'; + $self->set('options', $options); return $self->SUPER::toHtml .WebGUI::Form::Text->new($self->session, size=>$self->session->setting->get("textBoxSize")-5, diff --git a/lib/WebGUI/Form/MimeType.pm b/lib/WebGUI/Form/MimeType.pm index 435a3ce8e..ae58397d4 100644 --- a/lib/WebGUI/Form/MimeType.pm +++ b/lib/WebGUI/Form/MimeType.pm @@ -104,6 +104,8 @@ sub toHtml { foreach ('text/html','text/css','text/javascript','text/plain','text/xml','application/xml') { $mimeTypes->{$_}=$_; } + my $value = $self->getOriginalValue(); + $mimeTypes->{$value} = $value; $self->set("options", $mimeTypes); return $self->SUPER::toHtml(); }