Timothy Babin writes: > Okay, I don't know these frameworks really well but I was trying to shorten > my mode-line information and came across this. > > > > Are the jde-plugin-minor-mode and jde-jdb-minor modes only for xemacs? >
Hi Timothy, I believe these modes are only for XEmacs to enable addition of a menu. However, it's been a long time since I visited this code so I want to check before adopting your suggestions. Paul > If so can we wrap there loading in jde-mode with a check for xemacs? > > (if (featurep 'xemacs) > (progn > ;; Install debug menu. > (if (string= (car jde-debugger) "JDEbug") > (jde-bug-minor-mode 1) > (jde-jdb-minor-mode 1)) > > ;; Install plugin menu. > (jde-plugin-minor-mode 1)) > ) > > > Also, what about a call to semantic mode line update at the end of > jde-jdb-minor-mode and jde-plugin-minor-mode to remove the modes from the > modeling > > (if (featurep 'xemacs) > (let ((menu-spec (jde-plugin-make-menu-spec))) > (if menu-spec > (if jde-plugin-minor-mode > (easy-menu-add menu-spec jde-plugin-mode-map) > (easy-menu-remove menu-spec))))) > (semantic-mode-line-update) > ) > <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN"> > <HTML> > <HEAD> > <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=us-ascii"> > <META NAME="Generator" CONTENT="MS Exchange Server version 5.5.2658.2"> > <TITLE>Jde-plugin-minor-mode and jde-jdb-minor-mode only xemacs?</TITLE> > </HEAD> > <BODY> > > <P><FONT FACE="Arial">Okay, I don't know these frameworks really well but I > was trying to shorten my mode-line information and came across > this.</FONT></P> > <BR> > <BR> > > <P><FONT FACE="Arial">Are the jde-plugin-minor-mode and jde-jdb-minor modes > only for xemacs?</FONT> > </P> > > <P><FONT FACE="Arial">If so can we wrap there loading in jde-mode with a > check for xemacs?</FONT> > </P> > > <P><FONT FACE="Arial"> (if > (featurep 'xemacs)</FONT> > <BR><FONT > FACE="Arial"> > (progn</FONT> > <BR><FONT > FACE="Arial"> > ;; Install debug menu.</FONT> > <BR><FONT > FACE="Arial"> > (if (string= (car jde-debugger) "JDEbug")</FONT> > <BR><FONT > FACE="Arial"> > (jde-bug-minor-mode 1)</FONT> > <BR><FONT > FACE="Arial"> > (jde-jdb-minor-mode 1))</FONT> > </P> > > <P><FONT > FACE="Arial"> > ;; Install plugin menu.</FONT> > <BR><FONT > FACE="Arial"> > (jde-plugin-minor-mode 1))</FONT> > <BR><FONT > FACE="Arial"> )</FONT> > </P> > <BR> > > <P><FONT FACE="Arial">Also, what about a call to semantic mode line update > at the end of jde-jdb-minor-mode and jde-plugin-minor-mode to remove the > modes from the modeling</FONT></P> > > <P><FONT FACE="Arial"> (if (featurep 'xemacs)</FONT> > <BR><FONT FACE="Arial"> (let ((menu-spec > (jde-plugin-make-menu-spec)))</FONT> > <BR> <FONT FACE="Arial">(if > menu-spec</FONT> > <BR> <FONT > FACE="Arial"> (if jde-plugin-minor-mode</FONT> > <BR> > <FONT FACE="Arial">(easy-menu-add > menu-spec jde-plugin-mode-map)</FONT> > <BR> <FONT > FACE="Arial"> (easy-menu-remove > menu-spec)))))</FONT> > <BR><FONT FACE="Arial"> (semantic-mode-line-update)</FONT> > <BR><FONT FACE="Arial">) </FONT> > </P> > > </BODY> > </HTML>