From 46a3d8b7197e237c2319021be3ace244233e08a0 Mon Sep 17 00:00:00 2001
From: Johannes Hofmann <Johannes.Hofmann@gmx.de>
Date: Tue, 24 Mar 2009 16:30:05 +0100
Subject: Backed out changeset e96fa3a4608e

---
 src/GipfelWidget.cxx | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

(limited to 'src/GipfelWidget.cxx')

diff --git a/src/GipfelWidget.cxx b/src/GipfelWidget.cxx
index aa66a6e..0f94f9f 100644
--- a/src/GipfelWidget.cxx
+++ b/src/GipfelWidget.cxx
@@ -18,6 +18,7 @@
 #include <algorithm>
 
 #include <FL/Fl.H>
+#include <FL/Fl_Menu_Item.H>
 #include <FL/Fl_Shared_Image.H>
 #include <FL/Fl_JPEG_Image.H>
 #include <FL/Fl_Preferences.H>
@@ -38,6 +39,7 @@ GipfelWidget::GipfelWidget(int X,int Y,int W, int H): Fl_Group(X, Y, W, H) {
 	pan = new Panorama();
 	cur_mountain = NULL;
 	focused_mountain = NULL;
+	mb = NULL;
 	known_hills = new Hills();
 	img_file = NULL;
 	track_width = 200.0;
@@ -73,6 +75,11 @@ GipfelWidget::load_image(char *file) {
 	h(img->h());  
 	w(img->w());  
 
+	mb = new Fl_Menu_Button(x(),y(),w()+x(),h()+y(),"&popup");
+	mb->type(Fl_Menu_Button::POPUP3);
+	mb->box(FL_NO_BOX);
+	mb->add("Center Peak", 0, (Fl_Callback*) center_cb, this);
+
 	// try to retrieve gipfel data from JPEG meta data
 	md->load_image(file);
 	set_view_long(md->longitude());
@@ -510,6 +517,19 @@ GipfelWidget::get_focal_length_35mm() {
 		return pan->get_scale() * 35.0 / (double) img->w();
 }
 
+void 
+GipfelWidget::center_cb(Fl_Widget *o, void *f) {
+	GipfelWidget *g = (GipfelWidget*) f;
+
+	Hill *m = choose_hill(g->pan->get_close_mountains(), "Center Peak");
+	if (m) {
+		g->set_center_angle(m->alph / deg2rad);
+			
+		if (!g->known_hills->contains(m))
+			g->known_hills->add(m);
+	}
+}
+
 void
 GipfelWidget::set_height_dist_ratio(double r) {
 	pan->set_height_dist_ratio(r);
-- 
cgit v1.2.3