Attempt to reduce :keyword pollution

s/in-package :webkit2/in-package #:webkit2/g
joachifm · Dec 21, 2014 · a507968 · a507968
1 parent 5c02b90
commit a507968
Show file tree

Hide file tree

Showing 37 changed files with 37 additions and 37 deletions.
diff --git a/webkit2/macros.lisp b/webkit2/macros.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 ;;; A more convenient wrapper for DEFINE-G-OBJECT-CLASS
 

diff --git a/webkit2/translate.lisp b/webkit2/translate.lisp
@@ -12,7 +12,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (defun translate-webkit-class-name (g-class-name)
   (cffi:translate-camelcase-name g-class-name

diff --git a/webkit2/util.lisp b/webkit2/util.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (defun foo->symbol (&rest lst)
   "Convert a list of things (coercible to string) into a symbol."

diff --git a/webkit2/webkit2.authentication-request.lisp b/webkit2/webkit2.authentication-request.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitAuthenticationRequest" () ())
 

diff --git a/webkit2/webkit2.back-forward-list-item.lisp b/webkit2/webkit2.back-forward-list-item.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitBackForwardListItem" () ()) ; XXX: GInitiallyUnowned
 

diff --git a/webkit2/webkit2.back-forward-list.lisp b/webkit2/webkit2.back-forward-list.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitBackForwardList" () ())
 

diff --git a/webkit2/webkit2.context-menu-item.lisp b/webkit2/webkit2.context-menu-item.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitContextMenuItem" () ()) ; XXX: GInitiallyUnowned
 

diff --git a/webkit2/webkit2.context-menu.lisp b/webkit2/webkit2.context-menu.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitContextMenu" () ())
 

diff --git a/webkit2/webkit2.cookie-manager.lisp b/webkit2/webkit2.cookie-manager.lisp
@@ -10,7 +10,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitCookieManager" () ())
 

diff --git a/webkit2/webkit2.download.lisp b/webkit2/webkit2.download.lisp
@@ -10,7 +10,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitDownload" ()
   (("destination" "gchararray")

diff --git a/webkit2/webkit2.error.lisp b/webkit2/webkit2.error.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-g-enum "WebKitNetworkError" webkit-network-error ()
   :webkit-network-error-failed

diff --git a/webkit2/webkit2.favicon-database.lisp b/webkit2/webkit2.favicon-database.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitFaviconDatabase" () ())
 

diff --git a/webkit2/webkit2.file-chooser-request.lisp b/webkit2/webkit2.file-chooser-request.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitFileChooserRequest" ()
   (("filter" "GtkFileFilter")

diff --git a/webkit2/webkit2.find-controller.lisp b/webkit2/webkit2.find-controller.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitFindController" ()
   (("max-match-count" "guint")

diff --git a/webkit2/webkit2.form-submission-request.lisp b/webkit2/webkit2.form-submission-request.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitFormSubmissionRequest" () ())
 

diff --git a/webkit2/webkit2.frame.lisp b/webkit2/webkit2.frame.lisp
@@ -1,4 +1,4 @@
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitFrame" () ())
 

diff --git a/webkit2/webkit2.hit-test-result.lisp b/webkit2/webkit2.hit-test-result.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitHitTestResult" ()
   (("context" "guint" t t)

diff --git a/webkit2/webkit2.init.lisp b/webkit2/webkit2.init.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-foreign-library libwebkit2
     (:unix (:or "libwebkit2gtk-4.0.so"         ; webkit2gtk-2.6.4

diff --git a/webkit2/webkit2.navigation-action.lisp b/webkit2/webkit2.navigation-action.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (defctype webkit-navigation-action :pointer) ; XXX: GBoxed
 

diff --git a/webkit2/webkit2.navigation-policy-decision.lisp b/webkit2/webkit2.navigation-policy-decision.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitNavigationPolicyDecision"
   (:superclass webkit-policy-decision)

diff --git a/webkit2/webkit2.permission-request.lisp b/webkit2/webkit2.permission-request.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-g-interface "WebKitPermissionRequest" webkit-permission-request
   (:export t

diff --git a/webkit2/webkit2.plugin.lisp b/webkit2/webkit2.plugin.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitPlugin" () ())
 

diff --git a/webkit2/webkit2.policy-decision.lisp b/webkit2/webkit2.policy-decision.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitPolicyDecision" () ())
 

diff --git a/webkit2/webkit2.print-operation.lisp b/webkit2/webkit2.print-operation.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitPrintOperation" ()
   (("page-setup" "GtkPageSetup" t t)

diff --git a/webkit2/webkit2.response-policy-decision.lisp b/webkit2/webkit2.response-policy-decision.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitResponsePolicyDecision"
   (:superclass webkit-policy-decision)

diff --git a/webkit2/webkit2.script-world.lisp b/webkit2/webkit2.script-world.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitScriptWorld" () ())
 

diff --git a/webkit2/webkit2.security-manager.lisp b/webkit2/webkit2.security-manager.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitSecurityManager" () ())
 

diff --git a/webkit2/webkit2.settings.lisp b/webkit2/webkit2.settings.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitSettings" ()
    (("allow-modal-dialogs" "gboolean" t t)

diff --git a/webkit2/webkit2.uri-request.lisp b/webkit2/webkit2.uri-request.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitURIRequest" ()
   (("uri" "gchararray" t t)))

diff --git a/webkit2/webkit2.uri-response.lisp b/webkit2/webkit2.uri-response.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitURIResponse" ()
   (("content-length" "guint")

diff --git a/webkit2/webkit2.user-content-manager.lisp b/webkit2/webkit2.user-content-manager.lisp
@@ -8,6 +8,6 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitUserContentManager" () ())
diff --git a/webkit2/webkit2.web-context.lisp b/webkit2/webkit2.web-context.lisp
@@ -10,7 +10,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitWebContext" () ())
 

diff --git a/webkit2/webkit2.web-inspector.lisp b/webkit2/webkit2.web-inspector.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitWebInspector" ()
   (("attached-height" "guint")

diff --git a/webkit2/webkit2.web-page.lisp b/webkit2/webkit2.web-page.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitWebPage" ()
   (("uri" "gchararray")))

diff --git a/webkit2/webkit2.web-resource.lisp b/webkit2/webkit2.web-resource.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitWebResource" ()
   (("response" "WebKitURIResponse")

diff --git a/webkit2/webkit2.web-view.lisp b/webkit2/webkit2.web-view.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (defparameter +webkit-editing-command-cut+ "Cut") ; XXX: WEBKIT_EDITING_COMMAND_CUT
 (defparameter +webkit-editing-command-copy+ "Copy") ; XXX: WEBKIT_EDITING_COMMAND_COPY

diff --git a/webkit2/webkit2.window-properties.lisp b/webkit2/webkit2.window-properties.lisp
@@ -8,7 +8,7 @@
 
 ;;; Code:
 
-(in-package :webkit2)
+(in-package #:webkit2)
 
 (define-webkit-class "WebKitWindowProperties" ()
   (("fullscreen" "gboolean" t t)