Changeset a70441f in git for Singular/emacs.cc

Timestamp:

Apr 27, 2000, 12:07:30 PM (24 years ago)

Author:

Olaf Bachmann <obachman@…>

Branches:

(u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')

Children:

e5f8ae07e0b41bb1b0e5aaaac2dad244e619d563

Parents:

eec9b2d2a332c04f20d743bdd4ccc107766fbc61

Message:

Windows and gcc 2.95 porting


git-svn-id: file:///usr/local/Singular/svn/trunk@4273 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/emacs.cc (modified) (3 diffs)

Singular/emacs.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: emacs.cc,v 1.11 1999-12-16 13:41:30 obachman Exp $ */
+/* $Id: emacs.cc,v 1.12 2000-04-27 10:07:05 obachman Exp $ */
 /*
 * ABSTRACT: Esingular main file
@@ -145 +145 @@
   // make sure  emacs, singular, emacs_dir, emacs_load are set
   if (emacs == NULL) emacs = feResource("emacs", 0);
+  if (emacs == NULL) emacs = feResource("xemacs", 0);
   if (emacs == NULL)
   {
@@ -215 +216 @@
     prefix = "-";
   getcwd(cwd, MAXPATHLEN);
-
+  // append / at the end of cwd
+  if (cwd[strlen(cwd)-1] != '/') strcat(cwd, "/");
+    
   // Note: option -no-init-file should be equivalent to -q. Anyhow, 
   // xemacs-20.4 sometimes crashed on startup when using -q. DonŽt know why.