diff --git a/ChangeLog b/ChangeLog
index 7ff0210a..f3d3003e 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sun Feb 14 06:56:00 2000 Richard Frith-Macdonald <richard@brainstorm.co.uk>
+
+	* Palettes/2Control/main.m: Add popup and pulldown menu controls
+	though there is no way to edit them yet.
+
 Sun Feb  6  8:44:00 2000 Richard Frith-Macdonald <richard@brainstorm.co.uk>
 
 	Removed InfoPanel.m and updated Gorm to use standard panel now that
diff --git a/Palettes/2Controls/main.m b/Palettes/2Controls/main.m
index fc28b9d1..7bf037f5 100644
--- a/Palettes/2Controls/main.m
+++ b/Palettes/2Controls/main.m
@@ -63,6 +63,21 @@
   RELEASE(v);
 #endif
 
+  v = [[NSPopUpButton alloc] initWithFrame: NSMakeRect(10, 60, 80, 20)];
+  [v addItemWithTitle: @"PopUp1"];
+  [v addItemWithTitle: @"PopUp2"];
+  [v addItemWithTitle: @"PopUp3"];
+  [contents addSubview: v];
+  RELEASE(v);
+
+  v = [[NSPopUpButton alloc] initWithFrame: NSMakeRect(10, 30, 80, 20)];
+  [v setPullsDown: YES];
+  [v addItemWithTitle: @"PullDown1"];
+  [v addItemWithTitle: @"PullDown2"];
+  [v addItemWithTitle: @"PullDown3"];
+  [contents addSubview: v];
+  RELEASE(v);
+
   v = [[NSTextField alloc] initWithFrame: NSMakeRect(100, 160, 80, 20)];
   [v setEditable: NO];
   [v setSelectable: NO];