ajout glicid-motif + glicid-xmgrace

gnu/packages/glicid.scm

@@ -572,6 +572,105 @@
  )
 )
 
+(define-public glicid-motif
+  (package
+    (name "glicid-motif")
+    (version "2.3.8")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "https://sourceforge.net/projects/motif/files/Motif%202.3.8%20Source%20Code/motif-2.3.8.tar.gz/download"))
+
+              (sha256 (base32 "1rxwkrhmj8sfg7dwmkhq885valwqbh26d79033q7vb7fcqv756w5"))
+             )
+    )
+    (build-system gnu-build-system)
+
+(arguments
+     `(#:make-flags
+;;	       #:make-flags
+       (list (string-append "PREFIX=" %output)
+;             (string-append "CC=" ,(cc-for-target))
+             ;; Xft.h #includes <ft2build.h> without ‘freetype2/’.  The Makefile
+             ;; works around this by hard-coding /usr/include & $PREFIX.
+             (string-append "CPPFLAGS=-I"
+                            (assoc-ref %build-inputs "freetype")
+                            "/include/freetype2")
+             "V=1")
+ )
+)
+
+(inputs
+      `(("libxext" ,libxext)
+        ("libx11", libx11)
+        ("freetype",freetype)
+	("libxft",libxft)
+        ("xbitmaps",xbitmaps)
+        ("pkg-config" ,pkg-config)
+	("flex" ,flex)
+	("bison" ,bison)
+        ("libxt" ,libxt)))
+
+  (synopsis "Motif")
+    (description "Motif ")
+    (home-page "https://sourceforge.net/untested")
+    (license " ")
+
+ )
+)
+
+(define-public glicid-xmgrace
+  (package
+    (name "glicid-xmgrace")
+    (version "5.1.25")
+    (source (origin
+              (method git-fetch)
+              (uri (git-reference
+              (url "https://oauth2:9i-PgbC2w_JEx6DUUqzf@gitlab.univ-nantes.fr/CCIPL/legacy_code_mirror/grace.git")
+              (commit (string-append "v" version))))
+              (sha256 (base32 "1wb8v0q8xa2akas0swpgdgw1s66i50k7kh1g2f894hnk91fzx56z"))
+             )
+    )
+    (build-system gnu-build-system)
+
+ (arguments
+     `(
+       #:phases
+       (modify-phases %standard-phases
+         (add-after 'configure 'patch-/bin/sh
+           (lambda _
+             (substitute* '("Make.conf")
+              (("/bin/sh") (which "bash"))
+             )
+           ) 
+         )
+        )
+       )
+      ) 
+
+    (inputs
+      `(
+        ("libx11", libx11)
+        ("libxft",libxft)
+        ("libxt",libxt)
+	("libxpm",libxpm)
+        ("libxext" ,libxext)
+        ("autoconf", autoconf)
+        ("glicid-motif" ,glicid-motif)
+        ("fontconfig", fontconfig)
+        ("gfortran", gfortran)
+        ("libjpeg-turbo", libjpeg-turbo)
+;;        ("libxmhtml", libxmhtml)
+       )
+    )
+
+
+   (synopsis "Xmgrace")
+   (description "xmgrace")
+   (home-page "https://sourceforge.net/untested")
+   (license " ")
+
+ )
+)