+bool
+PannerBar::entry_input (double *new_value)
+{
+ Entry* e = dynamic_cast<Entry*> (&spinner);
+ string const text = e->get_text ();
+
+ string digits;
+ string letters;
+
+ string const L = _("L");
+ string const C = _("C");
+ string const R = _("R");
+
+ for (string::size_type i = 0; i < text.length(); ++i) {
+ if (isdigit (text[i])) {
+ digits += text[i];
+ } else if (text[i] != '%') {
+ letters += text[i];
+ }
+ }
+
+ if (letters.empty()) {
+ /* no letter specified, so take any number as a percentage where
+ * 0 is left and 100 right */
+ *new_value = digits.empty() ? 0.5 : (atoi (digits.c_str()) / 100.0);
+ } else {
+ /* letter given, so value is a percentage to the extreme
+ * (e.g. 100L is full left, 1L is slightly left */
+ if (letters[0] == L[0] || letters[0] == tolower (L[0])) {
+ *new_value = digits.empty() ? 0 : (0.5 - atoi (digits.c_str()) / 200.0);
+ } else if (letters[0] == R[0] || letters[0] == tolower (R[0])) {
+ *new_value = digits.empty() ? 1 : 0.5 + atoi (digits.c_str()) / 200.0;
+ } else if (letters[0] == C[0] || letters[0] == tolower (C[0])) {
+ *new_value = 0.5;
+ }
+ }
+
+ return true;
+}
+
+bool
+PannerBar::entry_output ()
+{
+ Entry* e = dynamic_cast<Entry*> (&spinner);
+ e->set_text (value_as_string (spinner.get_adjustment()->get_value()));
+ return true;
+}
+
+string
+PannerBar::value_as_string (double v) const
+{
+ if (ARDOUR::Panner::equivalent (v, 0.5)) {
+ return _("C");
+ } else if (ARDOUR::Panner::equivalent (v, 0)) {
+ return _("L");
+ } else if (ARDOUR::Panner::equivalent (v, 1)) {
+ return _("R");
+ } else if (v < 0.5) {
+ std::stringstream s;
+ s << fixed << setprecision (0) << _("L") << ((0.5 - v) * 200) << "%";
+ return s.str();
+ } else if (v > 0.5) {
+ std::stringstream s;
+ s << fixed << setprecision (0) << _("R") << ((v -0.5) * 200) << "%";
+ return s.str ();
+ }
+
+ return "";
+}
+
+std::string
+PannerBar::get_label (int& x)
+{
+ double const value = spinner.get_adjustment()->get_value ();
+
+ if (ARDOUR::Panner::equivalent (value, 0.5)) {
+
+ /* centre: only display text during a drag */
+
+ if (!grabbed) {
+ return "";
+ }
+
+ } else {
+
+ /* non-centre: display text on the side of the panner which has more space */
+
+ Glib::RefPtr<Pango::Context> p = get_pango_context ();
+ Glib::RefPtr<Pango::Layout> l = Pango::Layout::create (p);
+ l->set_text (value_as_string (value));
+
+ Pango::Rectangle const ext = l->get_ink_extents ();
+
+ if (value < 0.5) {
+ x = (darea.get_width() - 4 - ext.get_width() / Pango::SCALE);
+ } else {
+ x = 4;
+ }
+ }
+
+ return value_as_string (value);
+}