Package: dpkg-dev-el
Version: 34.0
Severity: normal
File: /usr/share/emacs/site-lisp/dpkg-dev-el/dpkg-dev-el.el

In dpkg-dev-el.el the modify-coding-system-alist entry for utf-8 on
debhelper debian/packagename.changelog files looks like it's missing a
"+" to match package names of more than one char, and alas also I
believe [:lower:][:digit:] forms don't work in xemacs21.

Perhaps the change below, though personally I'd be tempted to loosen to
something along the lines of

    "/debian/[^/]*changelog\\'"
or
    "/debian/\\([^/]*\\.\\)?changelog\\'"

rather than being strict about what a debian package name is.  (And
debian-changelog-mode.el kept in sync either way I suppose.)

(Something fishy happens in xemacs21 visiting a new debian/foo.changelog
file, but it gets the right utf-8 on an already-existing file provided
you've got utf-8 from mule-ucs at startup.)

Index: dpkg-dev-el.el
===================================================================
RCS file: /cvsroot/pkg-goodies-el/emacs-goodies-el/elisp/dpkg-dev-el/dpkg-dev-el.el,v
retrieving revision 1.2
diff -u -u -r1.2 dpkg-dev-el.el
--- dpkg-dev-el.el	23 Feb 2009 16:18:53 -0000	1.2
+++ dpkg-dev-el.el	2 Jul 2010 19:28:41 -0000
@@ -72,8 +72,12 @@
   (modify-coding-system-alist 'file "/debian/control\\'" 'utf-8)
 
 ;;; (modify-coding-system-alist 'file "/debian/changelog\\'" 'utf-8)
-;;; Instead use this.  See http://bugs.debian.org/457047 by Trent W. Buck
-  (modify-coding-system-alist 'file "/debian/\\([[:lower:][:digit:].+-]\\.\\)?changelog\\'" 'utf-8)
+;;; Instead use this for dh_installchangelog debian/packagename.changelog
+;;; files too.  See http://bugs.debian.org/457047 by Trent W. Buck
+;;; But not [:lower:][:digit:] since those forms are not available in xemacs21.
+;;; xemacs21 can have utf-8 at startup if you use mule-ucs with
+;;; DEB_MULEUCS_UNICODE=yes
+  (modify-coding-system-alist 'file "/debian/\\([a-z0-9.+-]+\\.\\)?changelog\\'" 'utf-8)
 
   ;; Handle Debian native package, from Kevin Ryde in bug #317597 and #416218
   (defun debian-changelog-coding-system (args)



-- System Information:
Debian Release: squeeze/sid
  APT prefers unstable
  APT policy: (500, 'unstable')
Architecture: i386 (i686)

Kernel: Linux 2.6.30-1-486
Locale: LANG=en_AU, LC_CTYPE=en_AU (charmap=ISO-8859-1)
Shell: /bin/sh linked to /bin/dash

Versions of packages dpkg-dev-el depends on:
ii  debian-el                    34.0        Emacs helpers specific to Debian u
ii  emacs21 [emacsen]            21.4a+1-5.7 The GNU Emacs editor
ii  emacs22-gtk [emacsen]        22.3+1-1.2  The GNU Emacs editor (with GTK use
ii  emacs23 [emacsen]            23.2+1-2    The GNU Emacs editor (with GTK+ us
ii  xemacs21-mule [emacsen]      21.4.22-3   highly customizable text editor --

Versions of packages dpkg-dev-el recommends:
ii  wget                          1.12-2     retrieves files from the web

Versions of packages dpkg-dev-el suggests:
ii  dpkg-dev                      1.15.7.2   Debian package development tools

-- Configuration Files:
/etc/emacs/site-start.d/50dpkg-dev-el.el changed:
;; -*-emacs-lisp-*-
;;
;; Emacs startup file for the Debian GNU/Linux dpkg-dev-el package
(cond
 ((not (file-exists-p "/usr/share/emacs/site-lisp/dpkg-dev-el"))
  (message "Package dpkg-dev-el removed but not purged.  Skipping setup."))
 ((not (file-exists-p (concat "/usr/share/"
                              (symbol-name debian-emacs-flavor)
                              "/site-lisp/dpkg-dev-el/readme-debian.elc")))
  (message "Package dpkg-dev-el not fully installed.  Skipping setup."))
 (t
  (debian-pkg-add-load-path-item
   (concat "/usr/share/"
           (symbol-name debian-emacs-flavor)
           "/site-lisp/dpkg-dev-el"))
(load "/so/emacs-goodies-el/emacs-goodies-el/elisp/dpkg-dev-el/dpkg-dev-el.el")
  (require 'dpkg-dev-el)))


-- no debconf information

Reply via email to