[jdee-devel] Change to jde-run-classpath-arg

[Jeff P. <jpj...@ya...>]

Not sure if this was a bug, or I'm just doing the 
wrong thing, (or if I just have an old release)
but my attempts to set jde-run-option-classpath in 
my prj.el:
 '(jde-run-option-classpath (quote 
("./dist/boot.jar" "./dist/conf"  )))
 
Failed due to the value not being a String (not 
"global" or "none")
But it seems that it really needs to be a list of 
string for this to work.
[and the docs and 'customize' method don't do 
anything to help/clarify/explain this]
 
So I added (stringp ...) as shown 
below:
 
 
(defmethod jde-run-classpath-arg ((this 
jde-run-vm))
  "Returns the classpath argument for this vm."
  (let 
((classpath
  (if jde-run-option-classpath
       (if (and (stringp jde-run-option-classpath)
         
(string= jde-run-option-classpath "global"))
    
jde-global-classpath
  (unless (and (stringp 
jde-run-option-classpath)
        (string= jde-run-option-classpath 
"none"))
    
jde-run-option-classpath))))
 (symbol
  (if (and 
jde-run-option-classpath
    (and (stringp 
jde-run-option-classpath)
         (string= jde-run-option-classpath 
"global")))
      'jde-global-classpath
    
'jde-run-option-classpath)))
    (if classpath
 (list
  
"-classpath"
  (jde-build-classpath
   classpath 
symbol)))))