08/14: build-system/dub: Fix typo.

[Tobias Geerinckx-Rice]

nckx pushed a commit to branch master
in repository guix.

commit 980bcecdab738304d171829e27b0a7521bdc2213
Author: Tobias Geerinckx-Rice <address@hidden>
Date:   Thu Jan 25 03:53:42 2018 +0100

    build-system/dub: Fix typo.
    
    * guix/build/dub-build-system.scm (grep, grep*): Correct ‘occurence’.
---
 guix/build/dub-build-system.scm | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

diff --git a/guix/build/dub-build-system.scm b/guix/build/dub-build-system.scm
index 432d51f..ed86635 100644
--- a/guix/build/dub-build-system.scm
+++ b/guix/build/dub-build-system.scm
@@ -1,6 +1,7 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2016 David Craven <address@hidden>
 ;;; Copyright © 2017 Danny Milosavljevic <address@hidden>
+;;; Copyright © 2018 Tobias Geerinckx-Rice <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -69,14 +70,14 @@
     (zero? (system* "dub" "add-path" vendor-dir))))
 
 (define (grep string file-name)
-  "Find the first occurence of STRING in the file named FILE-NAME.
-   Return the position of this occurence, or #f if none was found."
+  "Find the first occurrence of STRING in the file named FILE-NAME.
+   Return the position of this occurrence, or #f if none was found."
   (string-contains (call-with-input-file file-name get-string-all)
                    string))
 
 (define (grep* string file-name)
-  "Find the first occurence of STRING in the file named FILE-NAME.
-   Return the position of this occurence, or #f if none was found.
+  "Find the first occurrence of STRING in the file named FILE-NAME.
+   Return the position of this occurrence, or #f if none was found.
    If the file named FILE-NAME doesn't exist, return #f."
   (catch 'system-error
     (lambda ()