Need help with magit site-lisp

[Suvayu Ali]

Hi,

I'm on Fedora.  But I compile my own Emacs and install in /opt/.  To use
some popular extra packages, I use symlinks in the site-lisp in /opt/ to
the system-wide site-lisp directories.  This works very nicely for all
packages except for magit (this setup had no issues for many years,
until now).  I was wondering if someone could help me debug the issue.

My setup:

- Self-compiled Emacs in /opt/emacs-lisp.
- Corresponding site-lisp folder looks like this:

  $ lt -d magit site-start.d
  lrwxrwxrwx. 1 jallad jallad 32 Apr  5  2011 magit -> 
/usr/share/emacs/site-lisp/magit
  lrwxrwxrwx. 1 jallad jallad 40 Oct  8 15:55 site-start.d -> 
/usr/share/emacs/site-lisp/site-start.d/

When I start the system-wide Emacs, I can use magit just fine.  But when
I call magit from my self-compiled Emacs, I get the following backtrace:

Debugger entered--Lisp error: (wrong-type-argument listp 769)
  magit-max-args-internal(delete-directory)
  
byte-code("\300\301!\203\302\303\301\"\210\202\302\303\304\"\210\305\306!\204\302\306\307\"\210\305\310!\203,\302\311\310\"\210\2021\302\311\312\"\210\313\314!\315Y\203A\302\316\314\"\210\202F\302\316\317\"\210\300\207"
 [functionp start-file-process defalias magit-start-process start-process 
fboundp string-match-p #[(regexp string &optional start) "\304\305    \n
#)\207" [inhibit-changing-match-data regexp string start t string-match] 4 
"Same as `string-match' except this function does not\nchange the match data."] 
with-silent-modifications magit-with-silent-modifications (macro . #[(&rest 
body) "\301\302\303\304\305BBED\207" [body set-buffer-modified-p prog1 
(buffer-modified-p) let ((buffer-undo-list t) before-change-functions 
after-change-functions)] 6 "Execute body without changing `buffer-modified-p'. 
Also, do not\nrecord undo information."]) magit-max-args-internal 
delete-directory 2 magit-delete-directory #[(directory &optional recursive) 
"\304!\204\f\305!\204\306!\207       \2030\307\310\311#\312\211\203/
@\313\n   \"\210A\211\204 *\314!\207" [directory recursive file 
--cl-dolist-temp-- file-symlink-p file-directory-p delete-file directory-files 
full "\\([^.]\\|\\.\\([^.]\\|\\..\\)\\).*" nil magit-delete-directory 
delete-directory] 5 "Deletes a directory named DIRECTORY.  If RECURSIVE is 
non-nil,\nrecursively delete all of DIRECTORY's contents as well.\n\nDoes not 
follow symlinks."]] 3)
  autoload-do-load((autoload "magit" "Open a Magit status buffer for the Git 
repository containing\nDIR.  If DIR is not within a Git repository, offer to 
create a\nGit repository in DIR.\n\nInteractively, a prefix argument means to 
ask the user which Git\nrepository to use even if `default-directory' is under 
Git control.\nTwo prefix arguments means to ignore `magit-repo-dirs' when 
asking for\nuser input.\n\n(fn DIR)" t nil) magit-status)
  command-execute(magit-status record)
  execute-extended-command(nil "magit-status")
  call-interactively(execute-extended-command nil nil)
  command-execute(execute-extended-command)

I don't understand the backtrace.  Can someone help me?

Thanks,

-- 
Suvayu

Open source is the future. It sets us free.