[PATCH] Don't load window-system-specific features at compile, hyperbole

[Vin Shelton]

On Fri, Jul 11, 2008 at 6:12 PM, Aidan Kehoe <kehoea at parhasard.net> wrote:
>
> Hi Mats,
>
> This is a good and sane change provoked by the packages build failure of
> http://mid.gmane.org/20a807210807101850l173cefa6vcd4b9650733b34b5@mail.gmail.com
> I suspect that it will fix the packages build, but I don't know for sure,
> because I have to fight with the infrastructure of the autoload-operators.el
> and the new VM build structure to get the packages to the point of building
> at all, and I would prefer to do that tomorrow. Either way, it should be a
> useful thing to apply--there is no need to prevent an XEmacs without X11
> support from building Hyperbole.
>
> Bye,
>
> Aidan
>
> xemacs-packages/hyperbole/ChangeLog addition:
>
> 2008-07-12  Aidan Kehoe  <kehoea at parhasard.net>
>
>        * hmouse-key.el (noninteractive):
>        Do not load window-system-specific files at batch byte-compile
>        time; they may well be legitimately not available.
>

Hi, Aidan -

FYI - that patch did not suffice.  Similar backtrace:

    Requiring /media/sda4/build/xemacs-packages-2008-07-11/xemacs-packages/hyperbole/h-skip-bytec.lsp...
  Loading /media/sda4/build/xemacs-packages-2008-07-11/xemacs-packages/hyperbole/hmouse-sh.el...

xemacs exiting.

  # bind (stack-trace-on-signal debug-on-signal stack-trace-on-error
debug-on-error)
  # (unwind-protect ...)
  (list x-button-s-middle x-button-s-middle-up x-button-s-right
x-button-s-right-up)
  (mapcar (function (lambda (key) (cons key (lookup-key mouse-map
key)))) (list x-button-s-middle x-button-s-middle-up x-button-s-right
x-button-s-right-up))
  eval((mapcar (function (lambda (key) (cons key (lookup-key mouse-map
key)))) (list x-button-s-middle x-button-s-middle-up x-button-s-right
x-button-s-right-up)))
  hmouse-get-bindings()
  (setq hmouse-previous-bindings (hmouse-get-bindings))
  (or hmouse-bindings-flag hmouse-previous-bindings (setq
hmouse-previous-bindings (hmouse-get-bindings)))
  hmouse-setup()
  # bind (arg)
  hmouse-shift-buttons()
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  # (unwind-protect ...)
  load-internal("/media/sda4/build/xemacs-packages-2008-07-11/xemacs-packages/hyperbole/hyperbole.el"
nil t nil raw-text)
  # bind (handler path nosuffix nomessage noerror filename)
  load("/media/sda4/build/xemacs-packages-2008-07-11/xemacs-packages/hyperbole/hyperbole.el"
nil t)
  # bind (file arg)
  command-line-do-load("-l")
  # bind (dir file-count line end-of-options file-p arg tem)
  command-line-1()
  # bind (command-line-args-left)
  command-line()
  # bind (error-data)
  normal-top-level()
  # (condition-case ... . error)
  # (catch top-level ...)
Symbol's value as variable is void: x-button-s-middlemake[2]: ***
[auto-autoloads.elc] Error 255
make[2]: Leaving directory
`/media/sda4/build/xemacs-packages-2008-07-11/xemacs-packages/hyperbole'
make[1]: *** [hyperbole/bytecompile.target] Error 2
make[1]: Leaving directory
`/media/sda4/build/xemacs-packages-2008-07-11/xemacs-packages'
make: *** [xemacs-packages/bytecompile.target] Error 2


Thanks,
  Vin