Your message dated Wed, 4 Jul 2012 15:40:05 +0100
with message-id 
<CAPQ4b8keBuSM7-ysaqxXdQuAmvDAU=apndyotwpkh2ucv15...@mail.gmail.com>
and subject line Closing orphan/obsolete bugs (emacs21-el with tag 
unreproducible or fixed-upstream)
has caused the Debian Bug report #280570,
regarding ada-mode: ada-prj-edit is broken
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
Bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact [email protected]
immediately.)


-- 
280570: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=280570
Debian Bug Tracking System
Contact [email protected] with problems
--- Begin Message ---
Package: ada-mode
Severity: normal


The "Paths" portion of the dialog does not work, an error is signaled:

Debugger entered--Lisp error: (error "Overlapping fields")
  signal(error ("Overlapping fields"))
  error("Overlapping fields")
  widget-field-find(269)
  widget-after-change(269 273 0)
  move-to-column(54 t)
  (let ((value ...) (inhibit-read-only t) widget) (unless value (set ... ...)) 
(widget-insert text) (widget-insert ":") (move-to-column 54 t) (widget-put 
(widget-create ... :notify ... "Help") (quote prj-help) help-text) 
(widget-insert (concat "  (" ... ")\n")) (if is-paths (progn ... ... ... ...)) 
(set (quote widget) (if is-list ... ...)) (widget-put widget (quote prj-field) 
field) (if after-text (widget-insert after-text)) (widget-insert "\n"))
  ada-prj-field(src_dir "Source directories" "Enter the list of directories 
where your Ada\nsources can be found. These directories will be\nused for the 
cross-references and for the default\ncompilation commands.\nNote that src_dir 
includes both the build directory\nand the standard runtime." t t "           
/usr/lib/gcc-lib/i486-linux/2.8.1/adainclude/")
  (cond ((= tab-num 1) (widget-insert "_/             
\\/______________\\/______________\\/______________\\_____\n\n") (widget-insert 
"Project file name:\n") (widget-insert ...) (widget-insert "\n\n") 
(ada-prj-field ... "Executable file name" "Name of the executable generated 
when you\ncompile your application. This should include\nthe full directory 
name, using ${build_dir} if\nyou wish.") (ada-prj-field ... "File name of the 
main unit" "Name of the file to pass to the gnatmake command,\nand that will 
create the executable.\nThis should not include any directory specification.") 
(ada-prj-field ... "Build directory" "Reference directory for relative paths 
in\nsrc_dir and obj_dir below. This is also the directory\nwhere the 
compilation is done.") (ada-prj-field ... "Name of the remote machine (if any)" 
"If you want to remotely compile, debug and\nrun your application, specify the 
name of a\nremote machine here. This capability requires\nthe 'rsh' protocol on 
the remote machine
 .") (ada-prj-field ... "Prefix used in for the cross tool chain" "When working 
on multiple cross targets, it is\nmost convenient to specify the prefix of 
the\ntool chain here. For instance, on PowerPc\nvxworks, you would enter 
'powerpc-wrs-vxworks-'.\nTo use JGNAT, enter 'j'.")) ((= tab-num 2) 
(widget-insert "_/_____________\\/              
\\/______________\\/______________\\_____\n\n") (ada-prj-field ... "Source 
directories" "Enter the list of directories where your Ada\nsources can be 
found. These directories will be\nused for the cross-references and for the 
default\ncompilation commands.\nNote that src_dir includes both the build 
directory\nand the standard runtime." t t ...) (widget-insert "\n\n") 
(ada-prj-field ... "Object directories" "Enter the list of directories where 
the GNAT\nlibrary files (ALI files) can be found. These\nfiles are used for 
cross-references and by the\ngnatmake command.\nNote that obj_dir includes both 
the build directory\nand the standard runti
 me." t t ...) (widget-insert "\n\n")) ((= tab-num 3) (widget-insert 
"_/_____________\\/______________\\/              
\\/______________\\_____\n\n") (ada-prj-field ... "Switches for the compiler" 
"These switches are used in the default\ncompilation commands, both for 
compiling a\nsingle file and rebuilding the whole project") (ada-prj-field ... 
"Switches for the binder" "These switches are used in the default 
build\ncommand and are passed to the binder") (ada-prj-field ... "Switches for 
the linker" "These switches are used in the default build\ncommand and are 
passed to the linker") (ada-prj-field ... "Switches for gnatmake" "These 
switches are used in the default gnatmake\ncommand.")) ((= tab-num 4) 
(widget-insert "_/_____________\\/______________\\/______________\\/            
  \\_____\n\n") (widget-insert "All the fields below can use variable 
substitution\n") (widget-insert "The syntax is ${name}, where name is the name 
that\n") (widget-insert "appears after the Help bu
 ttons in this buffer.\n") (widget-insert "As a special case, ${current} is 
replaced with the name\n") (widget-insert "of the file currently edited, with 
directory name but\n") (widget-insert "no extension.\n\n") (widget-insert "The 
environment variables ADA_INCLUDE_PATH and ADA_OBJECTS_PATH\n") (widget-insert 
"are set to ${src_dir} and ${obj_dir} before running the compilation\n") 
(widget-insert "commands, so that you don't need to specify the -aI and -aO\n") 
(widget-insert "switches on the command line\n\n") (ada-prj-field ... "Check 
syntax of a single file (menu Ada->Check File)" "This command is run to check 
the syntax and semantics of a file.\nThe file name is added at the end of this 
command.") (ada-prj-field ... "Compiling a single file (menu Ada->Compile 
File)" "This command is run when the recompilation\nof a single file is needed. 
The file name is\nadded at the end of this command.") (ada-prj-field ... 
"Rebuilding the whole project (menu Ada->Build)" "This command i
 s run when you want to rebuild\nyour whole application. It is never 
issues\nautomatically and you will need to ask for it.\nIf remote_machine has 
been set, this command\nwill be executed on the remote machine.") 
(ada-prj-field ... "Running the application (menu Ada->Run)" "This command 
specifies how to run the\napplication, including any switch you need 
to\nspecify. If remote_machine has been set, this\ncommand will be executed on 
the remote host.") (ada-prj-field ... "Debugging the application" "Specifies 
how to debug the application, possibly\nremotely if remote_machine has been 
set. We\nrecommend the following debuggers:\n  > gdb\n  > gdbtk\n  > ddd --tty 
-fullname -toolbar")))
  ada-prj-display-page(2)
  (lambda (&rest dummy) (ada-prj-display-page 2))((push-button :args nil :value 
"Paths" :notify (lambda (&rest dummy) (ada-prj-display-page 2)) :button-overlay 
#<overlay from 273 to 1 in *Customize Ada Mode*> :from #<marker 
(before-insertion) at 273 in *Customize Ada Mode*> :to #<marker at 1 in 
*Customize Ada Mode*>) (push-button :args nil :value "Paths" :notify (lambda 
(&rest dummy) (ada-prj-display-page 2)) :button-overlay #<overlay from 273 to 1 
in *Customize Ada Mode*> :from #<marker (before-insertion) at 273 in *Customize 
Ada Mode*> :to #<marker at 1 in *Customize Ada Mode*>) nil)
  widget-apply((push-button :args nil :value "Paths" :notify (lambda (&rest 
dummy) (ada-prj-display-page 2)) :button-overlay #<overlay from 273 to 1 in 
*Customize Ada Mode*> :from #<marker (before-insertion) at 273 in *Customize 
Ada Mode*> :to #<marker at 1 in *Customize Ada Mode*>) :notify (push-button 
:args nil :value "Paths" :notify (lambda (&rest dummy) (ada-prj-display-page 
2)) :button-overlay #<overlay from 273 to 1 in *Customize Ada Mode*> :from 
#<marker (before-insertion) at 273 in *Customize Ada Mode*> :to #<marker at 1 
in *Customize Ada Mode*>) nil)
  widget-item-action((push-button :args nil :value "Paths" :notify (lambda 
(&rest dummy) (ada-prj-display-page 2)) :button-overlay #<overlay from 273 to 1 
in *Customize Ada Mode*> :from #<marker (before-insertion) at 273 in *Customize 
Ada Mode*> :to #<marker at 1 in *Customize Ada Mode*>) nil)
  widget-apply((push-button :args nil :value "Paths" :notify (lambda (&rest 
dummy) (ada-prj-display-page 2)) :button-overlay #<overlay from 273 to 1 in 
*Customize Ada Mode*> :from #<marker (before-insertion) at 273 in *Customize 
Ada Mode*> :to #<marker at 1 in *Customize Ada Mode*>) :action nil)
  widget-apply-action((push-button :args nil :value "Paths" :notify (lambda 
(&rest dummy) (ada-prj-display-page 2)) :button-overlay #<overlay from 273 to 1 
in *Customize Ada Mode*> :from #<marker (before-insertion) at 273 in *Customize 
Ada Mode*> :to #<marker at 1 in *Customize Ada Mode*>) nil)
  widget-button-press(136)
  call-interactively(widget-button-press)

-- System Information:
Debian Release: 3.1
  APT prefers unstable
  APT policy: (800, 'unstable')
Architecture: i386 (i686)
Kernel: Linux 2.6.10-rc1fw
Locale: LANG=en_US.UTF-8, LC_CTYPE=en_US.UTF-8 (charmap=UTF-8)


--- End Message ---
--- Begin Message ---
Hello,

Thanks for your interest in improving Debian, and sorry that the bugs
were not fully resolved in due time.

emacs21 packages have been removed from testing in 2009 [1], not
present even in the current stable.  Consequently, these bugs are now
orphan (without maintainer assigned) so they probably will not be
attended/noticed further.

[1] http://packages.qa.debian.org/e/emacs21.html

The bugs deemed valid are going to be verified and reassigned, but the
current bugs that I'm closing now are very ancient (more than 10 years
sometimes) and marked as unreproducible or fixed upstream years ago.

Please comment if you want think that some of the raised questions are
still pending and need to be addressed differently (e.g., reassigned
to other packages, etc.).

Cheers.


--- End Message ---

Reply via email to