reassign 270388 emacsen-common
retitle 270388 debian-pkg-add-load-path-item cannot handle nil in load-path
tags 270388 +patch
thanks
Hi,
======================================================================
File: emacs, Node: Lisp Libraries
The sequence of directories searched by `M-x load-library' is
specified by the variable `load-path', a list of strings that are
directory names. The default value of the list contains the directory
where the Lisp code for Emacs itself is stored. If you have libraries
of your own, put them in a single directory and add that directory to
`load-path'. `nil' in this list stands for the current default
directory, but it is probably not a good idea to put `nil' in the
list.
======================================================================
Arguably, putting nil in the load-path is a bad idea, just
like putting . in PATH is a bad idea, but it is still a legal value
with potentially useful semantics. People may well add nil to load
paths on their own, and it would be nice if Debian infrastructure
does not fall flat on its face when faced with a legal load-path.
I mean, this time it happened to be cedet-common, but it could
be anything -- or even the end user, the next time.
The fix is simple enough, and mentioned early in the bug
report: just fix the darned debian-pkg-add-load-path-item to not call
string-match on a nil value, which is as simple as adding a simple
test for nil (I am pedantically using (not (null foo)) below instead
of just foo, but hey).
manoj
diff -uBbwr emacsen-common-1.4.15.orig/debian-startup.el emacsen-common-1.4.15/debian-startup.el
--- emacsen-common-1.4.15.orig/debian-startup.el 2002-02-18 11:12:15.000000000 -0600
+++ emacsen-common-1.4.15/debian-startup.el 2005-01-22 00:35:34.000000000 -0600
@@ -41,7 +41,9 @@
;; Find the last /usr/local/ element.
(while (not (null lp-rest))
- (if (string-match "^/usr/local" (car lp-rest))
+ (if (and
+ (not (null (car lp-rest)))
+ (string-match "^/usr/local" (car lp-rest)))
(setq last-local-pos pos))
(setq pos (+ pos 1))
(setq lp-rest (cdr lp-rest)))
--
Before destruction a man's heart is haughty, but humility goes before
honour. Psalms 18:12
Manoj Srivastava <[EMAIL PROTECTED]> <http://www.debian.org/%7Esrivasta/>
1024D/BF24424C print 4966 F272 D093 B493 410B 924B 21BA DABB BF24 424C
