Impérialisme linguistique !

diff --git a/README b/README
index df19ef1128f86e90f50047f9c8a4161d43174640..d661dfa3e14954a32bac3542a9377a8c00bf905b 100644 (file)
--- a/README
+++ b/README
@@ -1,14 +1,14 @@
-This is a guix channel for my projects, and other random packages I need, hosted at https://www.ameliathe1st.gay.
+Ceci est un canal guix pour mes projets personnels, et tout autre paquet dont j'ai besoin.  
+Il est disponible sur le site https://www.ameliathe1st.gay.
 
-Project list:
-       - isos
-
-Add it to your channel list like this:
+Projets:
+       - Voyage Au Centre Des Fichiers: Un projet de μ-noyau, pour un système d'exploitation inspiré de Plan 9 et de l'ITS.
 
+Ajoutez le à votre liste de canaux ainsi:
 ```
 (channel
-  (name 'amy)
-  (url "https://git.ameliathe1st.gay/guix-channel.git")
+  (name 'amélia)
+  (url "https://git.ameliathe1st.gay/canal-guix.git")
   (branch "trunk")
   ;; Enable signature verification:
   (introduction

diff --git a/amy/packages/isos.scm b/amy/packages/system.scm
similarity index 83%
rename from amy/packages/isos.scm
rename to amy/packages/system.scm
index 048116aba16bdc63698b31daec0107e90ce58f2f..4e98169c490e065de6c43776439ff98326e3078c 100644 (file)
--- a/amy/packages/isos.scm
+++ b/amy/packages/system.scm
@@ -11,7 +11,7 @@
 ; You should have received a copy of the GNU General Public License along with this channel. If
 ; not, see <https://www.gnu.org/licenses/>.
 
-(define-module (amy packages isos)
+(define-module (amy packages system)
   #:use-module (guix)
   #:use-module (guix packages)
   #:use-module (guix git-download)
@@ -24,17 +24,17 @@
   #:use-module (gnu packages commencement)
   #:use-module (gnu packages bootloaders)
   #:use-module (gnu packages cdrom)
-  #:export (isos))
+  #:export (voyage-au-centre-des-fichiers))
 
-(define isos-target-triplet
+(define voyage-target-triplet
   "x86_64-elf")
 
-(define isos-binutils
-  (cross-binutils isos-target-triplet))
+(define voyage-binutils
+  (cross-binutils voyage-target-triplet))
 
-(define isos-gcc-user
-  (let ((%gcc (cross-gcc isos-target-triplet
-                         #:xbinutils isos-binutils
+(define voyage-gcc-user
+  (let ((%gcc (cross-gcc voyage-target-triplet
+                         #:xbinutils voyage-binutils
                          #:libc #f)))
     (package
       (inherit %gcc)
@@ -44,10 +44,10 @@
           #~(cons "--program-suffix=-user"
                   #$flags)))))))
 
-(define isos-gcc-system
-  (let ((%gcc (cross-gcc isos-target-triplet
+(define voyage-gcc-system
+  (let ((%gcc (cross-gcc voyage-target-triplet
                          #:xgcc gcc-13
-                         #:xbinutils isos-binutils
+                         #:xbinutils voyage-binutils
                          #:libc #f)))
     (package
       (inherit %gcc)
@@ -75,15 +75,15 @@
                     (("-fPIC ")
                      "")))))))))))
 
-(define isos
+(define voyage-au-centre-des-fichiers
   (package
-    (name "isos")
+    (name "voyage-au-centre-des-fichiers")
     (version "0.1-3ae74c837b0667ee04907c264062fd7a24182536")
     (source
      (origin
        (method git-fetch)
        (uri (git-reference
-             (url "https://git.ameliathe1st.gay/isos.git")
+             (url "https://git.ameliathe1st.gay/voyage-au-centre-des-fichiers.git")
              (commit "3ae74c837b0667ee04907c264062fd7a24182536"))) ;(string-append "v" version))))
        (file-name (string-append name "-" version "-checkout"))
        (sha256
@@ -94,8 +94,8 @@
                                                #$gcc-toolchain-13 "/include"))))
     (build-system gnu-build-system)
     (native-inputs (list util-linux
-                         isos-gcc-system
-                         isos-gcc-user
+                         voyage-gcc-system
+                         voyage-gcc-user
                          grub
                          xorriso))
     (inputs (list))