From f86f9ac1f1d9101555c38bd112cf24c1b63538a3 Mon Sep 17 00:00:00 2001
From: Dustin Kirkland <kirkland@ubuntu.com>
Date: Wed, 4 May 2011 02:24:11 -0500
Subject: [PATCH]   usr/share/doc/byobu/help.txt, usr/bin/Makefile.am,  
 usr/bin/byobu-ctrl-a: LP: #776743

---
 debian/changelog     |  5 ++--
 usr/bin/byobu-ctrl-a | 55 ++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 58 insertions(+), 2 deletions(-)
 create mode 100755 usr/bin/byobu-ctrl-a

diff --git a/debian/changelog b/debian/changelog
index d8979375..dae2d52c 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,8 +1,9 @@
-byobu (3.35) unreleased; urgency=low
+byobu (3.35c) unreleased; urgency=low
 
   * usr/bin/byobu-config, usr/share/byobu/keybindings/f-keys,
     usr/share/byobu/keybindings/screen-escape-keys,
-    usr/share/doc/byobu/help.txt, usr/bin/Makefile.am: LP: #776743
+    usr/share/doc/byobu/help.txt, usr/bin/Makefile.am,
+    usr/bin/byobu-ctrl-a: LP: #776743
     - use ASCII 16 (data link escape) as the escape character
     - bind F12 to printing the escape character
     - adjust everything accordingly
diff --git a/usr/bin/byobu-ctrl-a b/usr/bin/byobu-ctrl-a
new file mode 100755
index 00000000..0726609c
--- /dev/null
+++ b/usr/bin/byobu-ctrl-a
@@ -0,0 +1,55 @@
+#!/bin/sh
+#
+#    byobu-ctrl-a - set the ctrl-a behavior
+#    Copyright (C) 2011 Canonical Ltd.
+#
+#    Authors: Dustin Kirkland <kirkland@ubuntu.com>
+#
+#    This program is free software: you can redistribute it and/or modify
+#    it under the terms of the GNU General Public License as published by
+#    the Free Software Foundation, version 3 of the License.
+#
+#    This program is distributed in the hope that it will be useful,
+#    but WITHOUT ANY WARRANTY; without even the implied warranty of
+#    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+#    GNU General Public License for more details.
+#
+#    You should have received a copy of the GNU General Public License
+#    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+
+PKG="byobu"
+keybindings="$HOME/.$PKG/keybindings"
+touch "$keybindings"
+
+while true; do
+	echo
+	echo "Configure Byobu's ctrl-a behavior..."
+	echo
+	echo "When you press ctrl-a in Byobu, do you want it to operate in:"
+	echo "    (1) Emacs mode  (go to beginning of line)"
+	echo "    (2) Screen mode (screen's default escape sequence)"
+	echo "Note that F12 also operates as Screen escape in Byobu!"
+	echo
+	echo -n "Select [1 or 2]: "
+	s=$(head -n1)
+	echo
+	case "$s" in
+		1)
+			sed -i -e "/^register a /d" -e "/^bindkey \"^A\"/d" "$keybindings"
+			echo 'bindkey "^A"' >> "$keybindings"
+			echo "INFO: ctrl-a will now operate in emacs mode"
+			break
+		;;
+		2)
+			sed -i -e "/^register a /d" -e "/^bindkey \"^A\"/d" "$keybindings"
+			echo 'register a "\\020"' >> "$keybindings"
+			echo 'bindkey "^A" process a' >> "$keybindings"
+			echo "INFO: ctrl-a will now operate in screen mode"
+			break
+		;;
+	esac
+done
+screen -X at 0 source "$HOME/.$PKG/profile"
+echo "To modify this behavior again later, run 'byobu-ctrl-a'"
+echo