[Pkg-octave-commit] rev 348 - in trunk/packages/octave/debian: . in patches

[Rafael Laboissiere]

Author: rafael
Date: 2005-11-22 16:48:43 +0000 (Tue, 22 Nov 2005)
New Revision: 348

Added:
   trunk/packages/octave/debian/patches/50_octave-mod-bind-m-bs-2.9.dpatch
Modified:
   trunk/packages/octave/debian/changelog
   trunk/packages/octave/debian/in/octave2.9-00list
Log:
Debian release octave2.9_2.9.4-6


Modified: trunk/packages/octave/debian/changelog
===================================================================
--- trunk/packages/octave/debian/changelog	2005-11-22 13:44:46 UTC (rev 347)
+++ trunk/packages/octave/debian/changelog	2005-11-22 16:48:43 UTC (rev 348)
@@ -1,3 +1,12 @@
+octave2.9 (2.9.4-6) unstable; urgency=low
+
+   +++ Changes by Rafael Laboissiere
+
+  * debian/patches/50_octave-mod-bind-m-bs-2.9.dpatch: Bind M-BS key
+    sequence to backward-kill-word in XEmacs (closes: #340125)
+
+ -- Debian Octave Group <pkg-octave-devel at lists.alioth.debian.org>  Tue, 22 Nov 2005 14:48:51 +0100
+
 octave2.1 (2.1.72-5) unstable; urgency=low
 
    +++ Changes by Rafael Laboissiere

Modified: trunk/packages/octave/debian/in/octave2.9-00list
===================================================================
--- trunk/packages/octave/debian/in/octave2.9-00list	2005-11-22 13:44:46 UTC (rev 347)
+++ trunk/packages/octave/debian/in/octave2.9-00list	2005-11-22 16:48:43 UTC (rev 348)
@@ -1,3 +1,4 @@
 50_mkoctfile.1-no-negative
 50_install-liboctinterp
 50_octave-value-list-resize-2.9
+50_octave-mod-bind-m-bs-2.9

Added: trunk/packages/octave/debian/patches/50_octave-mod-bind-m-bs-2.9.dpatch
===================================================================
--- trunk/packages/octave/debian/patches/50_octave-mod-bind-m-bs-2.9.dpatch	2005-11-22 13:44:46 UTC (rev 347)
+++ trunk/packages/octave/debian/patches/50_octave-mod-bind-m-bs-2.9.dpatch	2005-11-22 16:48:43 UTC (rev 348)
@@ -0,0 +1,38 @@
+#! /bin/sh /usr/share/dpatch/dpatch-run
+## 50_octave-mod-bind-m-bs-2.9.dpatch by Rafael Laboissiere <rafael at debian.org>
+##
+## DP: Bind M-BS key sequence to backward-kill-word in XEmacs
+
+ at DPATCH@
+
+--- octave2.9-2.9.4.orig/emacs/octave-mod.el
++++ octave2.9-2.9.4/emacs/octave-mod.el
+@@ -203,6 +203,9 @@
+ 
+ (defvar inferior-octave-process nil)
+ 
++(defvar octave-xemacs-p
++  (string-match "XEmacs\\|Lucid" emacs-version))
++
+ (defvar octave-mode-map nil
+   "Keymap used in Octave mode.")
+ (if octave-mode-map
+@@ -219,6 +222,8 @@
+     (define-key map "\M-\C-a" 'octave-beginning-of-defun)
+     (define-key map "\M-\C-e" 'octave-end-of-defun)
+     (define-key map "\M-\C-h" 'octave-mark-defun)
++    (if octave-xemacs-p
++        (define-key map [(meta backspace)] 'backward-kill-word))
+     (define-key map "\M-\C-q" 'octave-indent-defun)
+     (define-key map "\C-c;" 'octave-comment-region)
+     (define-key map "\C-c:" 'octave-uncomment-region)
+@@ -638,9 +643,6 @@
+     (delete-horizontal-space)
+     (insert (concat " " octave-continuation-string))))
+ 
+-(defvar octave-xemacs-p
+-  (string-match "XEmacs\\|Lucid" emacs-version))
+-
+ ;;; Comments
+ (defun octave-comment-region (beg end &optional arg)
+   "Comment or uncomment each line in the region as Octave code.


Property changes on: trunk/packages/octave/debian/patches/50_octave-mod-bind-m-bs-2.9.dpatch
___________________________________________________________________
Name: svn:executable
   + *